當您處理包含空白行的大型數據集時，它會使您的工作表變得混亂並阻礙數據分析。 雖然您可以手動刪除少量空白行，但在處理數百個空白行時會變得耗時且效率低下。 在本教程中，我們介紹了六種不同的方法來高效地批量刪除空白行。 這些技術涵蓋您在 Excel 中可能遇到的各種情況，使您能夠處理更清晰、更結構化的數據。

• 刪除空白行
• 通過助手專欄
• 透過 Kutools 在 3 秒內完成
• 手動
• 通過使用 VBA
• 刪除包含空白單元格的行
• 通過轉到特殊功能
• 在過濾器功能的關鍵列中

視頻：刪除空白行

刪除空白行

從數據集中刪除空行時，一定要謹慎行事，因為一些通常建議的方法可能會意外刪除包含數據的行。 例如，在 Internet 上找到的兩個流行技巧是（下面的本教程中也提供了這些技巧）：

• 使用 ”去特別" 選擇空白單元格，然後刪除這些選定空白單元格的行。
• 使用 篩選 功能過濾關鍵列中的空白單元格，然後刪除過濾範圍內的空白行。

但是，這兩種方法都有可能錯誤地刪除包含重要數據的行，如下圖所示。

為避免此類意外刪除，建議 使用以下四種方法之一 精確刪除空白行。

>> 通過輔助列刪除空行

第 1 步：添加輔助列並使用 COUNTA 函數

1. 在數據集的最右邊，添加“幫手" 列並在該列的第一個單元格中使用以下公式：

   =COUNTA(A2:C2)

   

   備註：在公式中，A2:C2 是要計算非空白單元格的區域。



2. 然後 向下拖動自動填充手柄 填寫公式以計算每行中非空白單元格的數量。 “0” 表示相關行完全空白。

   

第 2 步：通過幫助列過濾空白行

1. 單擊輔助列的任意單元格，選擇 數據 > 篩選.

   

2. 然後點擊 過濾箭頭 並且只檢查 0 在展開的菜單中，然後單擊 OK.

   

   現在所有的空行都被過濾掉了。

   

第三步：刪除空白行

選擇空白行（點擊行號並向下拖動選擇所有空白行），然後右擊選擇 刪除行 從上下文菜單（或者您可以使用快捷方式 按Ctrl + -).

第四步：在Sort & Filter組中選擇Filter清除應用的過濾器

結果：

>> 透過 Kutools 在 3 秒內刪除空白行

為了快速輕鬆地從您的選擇中準確地消除空白行，最好的解決方案是利用 刪除空白行 的特點 Excel的Kutools。 具體方法如下：

1. 選擇要從中刪除空白行的範圍。
2. 點擊 庫工具 > 刪除 > 刪除空白行 > 在選定範圍內.
3. 根據需要選擇所需的選項，然後單擊 OK 在彈出的對話框中。

   

>> 手動刪除空白行

如果要刪除的空白行很少，您也可以手動刪除它們。

第 1 步：選擇空白行

單擊行號以選擇單個空白行。 如果有多個空行，按住 按Ctrl 鍵並逐一單擊行號以選擇它們。

第 2 步：刪除空行

選擇空行後，右鍵單擊並選擇 刪除 從上下文菜單（或者您可以使用快捷方式 按Ctrl + -).

結果：

>> 使用 VBA 刪除空行

如果您對 VBA 感興趣，本教程提供了兩個 VBA 代碼供您刪除所選內容和活動工作表中的空行。

步驟 1：將 VBA 複製到 Microsoft Visual Basic for Applications 窗口

1. 激活要從中刪除空白行的工作表，然後按 其他 + F11 鍵。

   

2. 在彈出窗口中，單擊 插入 > 模塊.

3. 然後將以下代碼之一複制並粘貼到空白的新模塊中。

   代碼 1：從活動工作表中刪除空白行

   Sub RemoveBlankRows()
   'UpdatebyExtendoffice
       Dim wsheet As Worksheet
       Dim lastRow As Long
       Dim i As Long
       
       ' Set the worksheet variable to the active sheet
       Set wsheet = ActiveSheet
       
       ' Get the last row of data in the worksheet
       lastRow = wsheet.Cells(wsheet.Rows.Count, 1).End(xlUp).Row
       
       ' Loop through each row in reverse order
       For i = lastRow To 1 Step -1
           ' Check if the entire row is blank
           If WorksheetFunction.CountA(wsheet.Rows(i)) = 0 Then
               ' If the row is blank, delete it
               wsheet.Rows(i).Delete
           End If
       Next i
   End Sub
   

   代碼 2：從選擇中刪除空白行

   Sub RemoveBlankRowsInRange()
   'UpdatebyExtendoffice
   Dim sRange As Range
   Dim row As Range
   ' Prompt the user to select a range
   On Error Resume Next
   Set sRange = Application.InputBox(prompt:="Select a range", Title:="Kutools for Excel", Type:=8)
   ' Check if a range is selected
   If Not sRange Is Nothing Then
   ' Loop through each row in reverse order
   For Each row In sRange.Rows
   ' Check if the entire row is blank
   If WorksheetFunction.CountA(row) = 0 Then
   ' If the row is blank, delete it
   row.Delete
   End If
   Next row
   Else
   MsgBox "No range selected. Please select a range and run the macro again.", vbExclamation
   End If
   End Sub
   

   

第 2 步：運行代碼並刪除空白行

點擊 運行按鈕 或按 F5 鍵來運行代碼。

• 如果您使用代碼 1 刪除活動工作表中的空行，則運行代碼後，將刪除工作表中的所有空行。

• 如果使用代碼2去除選擇中的空行，運行代碼後會彈出對話框，在對話框中選擇要去除空行的範圍，然後點擊 OK.

  

結果：

代碼 1：刪除活動工作表中的空行

代碼2：刪除選擇中的空行

刪除包含空白單元格的行

本節分為兩個部分：一個是使用 Go To Special 功能刪除包含空白單元格的行，另一個是使用 Filter 功能刪除特定鍵列中有空白的行。

>> 通過 Go To Special 刪除包含空白單元格的行

廣泛推薦使用 Go To Special 功能來刪除空行。 當您需要刪除至少包含一個空白單元格的行時，它可能是一種有用的工具。

第 1 步：選擇範圍內的空白單元格

1. 選擇要從中刪除空行的範圍，選擇 首頁 > 查找和選擇 > 去特別.

   

   或者你可以直接按 F5 啟用鑰匙 轉到 對話框，然後單擊 特別 按鈕切換到 轉到 特別 對話。

2. 在 去特別 對話框中，選擇 空白 選項並單擊 OK.

   

   現在所選範圍內的所有空單元格都已被選中。

   

第 2 步：刪除包含空白單元格的行

1. 右鍵單擊任何選定的單元格，然後選擇 刪除 從上下文菜單（或者您可以使用快捷方式 按Ctrl + -).

   

2. 在 刪除 對話框中，選擇 整行 選項並單擊 OK.

   

結果：

>> 通過篩選功能去除關鍵列中包含空白單元格的行

當您有一個大型數據集並希望根據關鍵列包含空白單元格的條件刪除行時，Excel 的篩選器功能可能是一個強大的工具。

第一步：過濾關鍵列中的空白單元格

1. 選擇數據集，單擊 數據 標籤，轉到 排序和過濾 組，單擊 篩選 將過濾器應用於數據集。

   

2. 點擊 過濾箭頭 在此示例中，您要刪除行所基於的鍵列的 ID 列是關鍵列，只檢查 空白 從展開的菜單。 點擊 OK.

   

   現在鍵列中的所有空白單元格都已被過濾。

   

第 2 步：刪除行

選擇剩餘的行（點擊行號並向下拖動選擇所有空白行），然後右擊選擇 刪除行 在上下文菜單中（或者您可以使用快捷方式 按Ctrl + -）。 然後單擊 OK 在彈出對話框中。

Step3：在Sort & Filter組中選擇Filter清除應用的過濾器

結果：