excel删除所有空白行vba 使用宏批量删除空行
为了维护Excel电子表格的结构和美观，有时候我们需要删除空白行，这时候有两种方法可以实现：一种是采用宏，使用脚本进行批量删除；另一种是使用Excel功能，单行操作。
第一种方法，比较适合需要删除较多行的情形，建议使用宏（vba）来处理。
要进行文本删除操作，需要定义函数以及调用函数的语句。
建议首先创建名称为delblanklines的子程序，代码如下：
Sub DelBlankLines
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Dim i As Long
i = ActiveSheet.Cells.End.Row
Do While i > 1
If Application.WorksheetFunction.CountA) = 0 Then Rows.Delete
i = i - 1
Loop
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
此子程序用于对列表中所有空白行进行删除。
以上就定义了回调函数，接下来需要调用这个函数来对Excel进行操作，建议使用VBA编辑器（Alt+F11），将下面的代码复制到模块窗口，即可实现宏调用。
Sub callDelBlankLines
Application.Run "delblanklines"
End Sub
在运行宏代码时，会调用delblanklines函数，对Excel表格中的空白行进行批量删除。
还可以使用Excel功能，依此对空白行进行处理。
1.在要处理的单元格（A3、A4，A5）右键单击“查找和替换”；
2.依次点击“选项”->“查找”->“查找空白区域”；
3.点击“确定”后，即可定位到空白行，然后按Ctrl+-（同时按住Ctrl和减号），可实现对单行的删除；
4.持续此操作，可实现对空白行的去除；
以上就是使用宏、vba和Excel功能来删除空白行的方法，虽然它们都能实现删除空白行的目的，但是其中推荐使用宏方法，大大节省了操作时间，而且操作过程简单方便，较为容易操作，可以让你在删除空白行时更加高效。
上一篇
