C#删除空白单元格
发布时间:2020-12-15 21:07:25 所属栏目:百科 来源:网络整理
导读:public static void ExportData() { Microsoft.Office.Interop.Excel.Application xlexcel; Microsoft.Office.Interop.Excel.Workbook xlWorkBook; Microsoft.Office.Interop.Excel.Worksheet xlWorkSheet; object misValue = System.Reflection.Missing.Val
public static void ExportData() { Microsoft.Office.Interop.Excel.Application xlexcel; Microsoft.Office.Interop.Excel.Workbook xlWorkBook; Microsoft.Office.Interop.Excel.Worksheet xlWorkSheet; object misValue = System.Reflection.Missing.Value; xlexcel = new Excel.Application(); xlexcel.Visible = true; xlWorkBook = xlexcel.Workbooks.Add(misValue); xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1); xlWorkBook.Application.ScreenUpdating = false; Excel.Range CR = (Excel.Range)xlWorkSheet.Cells[1,1]; CR.Select(); xlWorkSheet.PasteSpecial(CR,Type.Missing,true); Excel.Range DR = (Excel.Range)xlWorkSheet.Columns["A:A"]; DR.Select(); DR.Delete(); Excel.Range A1 = (Excel.Range)xlWorkSheet.Cells[1,1]; A1.Select(); } 这是我现有的功能.最后,我想从Excel中复制这个VB代码; Columns("A:A").Select Selection.SpecialCells(xlCellTypeBlanks).Select Selection.EntireRow.Delete 我尝试了几个不同的选项来取代“选择”,但我最接近的是,让C#侧选择空白单元格,但随后它将删除所有内容而不仅仅是选定的文本. 有人有我可以进去的方向吗? 也用; using Excel = Microsoft.Office.Interop.Excel; 解决方法Microsoft.Office.Interop.Excel.Application xlexcel; Microsoft.Office.Interop.Excel.Workbook xlWorkBook; Microsoft.Office.Interop.Excel.Worksheet xlWorkSheet; object misValue = System.Reflection.Missing.Value; xlexcel = new Excel.Application(); xlexcel.Visible = true; xlWorkBook = xlexcel.Workbooks.Add(misValue); xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1); xlWorkBook.Application.ScreenUpdating = false; Excel.Range CR = (Excel.Range)xlWorkSheet.Cells[1,true); Excel.Range DR = (Excel.Range)xlWorkSheet.Columns["A:A"]; DR.Select(); DR.Delete(); Excel.Range ACol = (Excel.Range)xlWorkSheet.Columns["A:A"]; Excel.Range Ronge = ACol.SpecialCells(Excel.XlCellType.xlCellTypeBlanks); Ronge.EntireRow.Delete(); Excel.Range A1 = (Excel.Range)xlWorkSheet.Cells[1,1]; A1.Select(); xlWorkBook.Application.ScreenUpdating = true; 通过Heinz答案和其他一些变化的混合来管理它,因为答案不会接受AddinGlobal. 如果将来有人需要它,上述工作就有用了.它将删除“A”列中的任何空行 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |