excel 删除数据区域内的所有空行的四种方法：排序、高级筛选、自动筛选、VBA编写

excel 删除数据区域内的所有空行的四种方法：排序、高级筛选、自动筛选、VBA编写

excel 删除数据区域内所有空行的方法有多种，比如排序、高级筛选、自动筛选、VBA编写。下面小编就这几种删除空行的方法逐一介绍。

本文实例为员工的工资和个税清单。在这个数据清单中就存在一些空行，为了制造数据透视表，首先就需要将这些空行删除掉。

第一种删除空行的方法：排序法　　第一步，在数据清单的右侧插入一个辅助列，D列。第二步，在D列中输入1,2,3,4,5,6，……连续的自然数序列。第三步，单击“数据”——“排序”，对职工姓名列（A列）进行升序排序，这样就将数据区域内的所有空行排在了数据区域的底部。第四步，删除数据区域内底部的所有空行。第五步，对D列进行升序排列，恢复数据的原始位置。第六步，删除辅助列，就得到删除所有空行后的数据区域。

第二种删除空行的方法方法：高级筛选法　　在利用高级筛选工具筛选并删除数据区域内的所有空行之前，首先要设置条件区域。进行设置条件区域需要了解条件区域的设置规则。为了筛选并删除数据区域内的所有空行，需要对数据区域内各列的数据进行判断，也就是判断在某行各列是否有数据。对于文本型数据，星号（*）表示有数据，对于数值型数据，不等于好（<>）表示有数据，这样，就可以在原始数据区域之外的任意单元格设置条件区域。设置完成条件区域后，单击“数据”——“筛选”——“高级筛选”命令，弹出高级筛选对话框，在“列表区域”文本框输入列表区域“$A$1:$C$20”，在“条件区域”输入“$E$2:$G$5”，选中“将筛选结果复制到其他位置”， 并在“复制到”输入“$I$1:$K$1”，单击确定即可。

第三种删除空行的方法方法：自动筛选法　　第一步，单击“数据”——“筛选”——“自动筛选”命令。第二步，从“姓名”单元格的下拉列表中选择（非空白）选项，得到筛选结果。第三步，选取数据区域的所有单元格，按下F5键，弹出“定位”对话框，单击“定位条件”，选择“可见单元格”，确定。第四步，复制，在需要保存数据的空白单元格单击，粘贴。第五步，删除原始数据区域。

第四种删除空行的方法方法：VBA代码　　编写下面一段出现，运行这段程序，就可以迅速的将原始数据区域内的所有空行删除。Sub DeleteEmptyRows()Dim LastRow As LongDim r As LongLastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.CountApplication.ScreenUpdating = FalseFor r = LastRow To 1 Step -1If Application.WorksheetFunction.CountA(Rows(r)) = 0 Then Rows(r).DeleteNext rApplication.ScreenUpdating = TrueEnd Sub