刪除數據區域內所有空行的方法有多種，比如排序、高級篩選、自動篩選、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 Long
Dim r As Long
LastRow = ActiveSheet.UsedRange.Row – 1 + ActiveSheet.UsedRange.Rows.Count
Application.ScreenUpdating = False
For r = LastRow To 1 Step -1
If Application.WorksheetFunction.CountA(Rows(r)) = 0 Then Rows(r).Delete
Next r
Application.ScreenUpdating = True
End Sub
