6 種簡單方法刪除 Excel 中的空行（逐步教學）

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

• 刪除空行
• 使用輔助列
• 使用 Kutools 在 3 秒內完成
• 手動刪除
• 使用 VBA 刪除
• 刪除包含空白單元格的行
• 使用「定位條件」功能
• 在關鍵列中使用「篩選」功能

視頻：刪除空行

刪除空行

在從數據集中刪除空行時，務必要小心謹慎，因為一些常見的方法可能會意外刪除包含數據的行。例如，網上流行的兩個技巧（本教程後面也會提到）是：

• 使用「定位條件」選擇空白單元格，然後刪除這些選定空白單元格所在的行。
• 使用「篩選」功能在關鍵列中篩選空白單元格，然後刪除篩選範圍中的空行。

然而，這兩種方法都有可能如以下截圖所示，誤刪包含重要數據的行。

為避免這樣的意外刪除，建議使用以下四種方法之一來精確刪除空行。

>> 使用輔助列刪除空行

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

1. 在數據集最右側，添加「輔助列」，並在該列的第一個單元格中使用以下公式：

   =COUNTA(A2:C2)

   

   注意：在公式中，A2:C2 是您要計算非空單元格的區域。
2. 然後拖動自動填充柄向下填充公式，以計算每一行中非空單元格的數量。「0」表示相對應的行完全空白。

   

步驟 2：通過輔助列篩選空行

1. 點擊輔助列中的任意單元格，選擇「數據」>「篩選」。

   

2. 然後點擊「篩選箭頭」，並僅勾選展開菜單中的「0」，然後點擊「確定」。

   

現在所有空行都已被篩選出來。

步驟 3：刪除空行

選擇空行（點擊行號並向下拖動以選擇所有空行），然後右鍵單擊並從上下文菜單中選擇「刪除行」（或者您可以使用快捷鍵「Ctrl」+「-」）。

步驟 4：在排序與篩選組中選擇篩選以清除已應用的篩選

結果：

>> 使用 Kutools 在 3 秒內刪除空行

如果您希望快速且毫不費力地準確刪除選擇範圍內的空行，最佳解決方案是利用「Kutools for Excel」的「刪除空行」功能。以下是具體操作方法：

1. 選擇您想要刪除空行的範圍。
2. 點擊「Kutools」>「刪除」>「刪除空行」>「選擇區域」。
3. 根據需求選擇所需的選項，並在彈出的對話框中點擊「確定」。

   

>> 手動刪除空行

如果只有少數空行需要刪除，您也可以手動刪除它們。

步驟 1：選擇空行

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

步驟 2：刪除空行

選擇空行後，右鍵單擊並從上下文菜單中選擇「刪除」（或者您可以使用快捷鍵「Ctrl」+「-」）。

結果：

>> 使用 VBA 刪除空行

如果您對 VBA 感興趣，本教程提供了兩段 VBA 程式碼，用於刪除選擇範圍和活動工作表中的空行。

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

1. 激活您想刪除空行的工作表，然後按下「Alt」+「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 從選擇範圍中刪除空行，則運行程式碼後會彈出一個對話框，在對話框中選擇您要刪除空行的範圍，然後點擊「確定」。

  

結果：

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

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

刪除包含空白單元格的行

本節分為兩部分：一部分是使用「定位條件」功能刪除包含空白單元格的行，另一部分是使用「篩選」功能刪除在特定關鍵列中有空白單元格的行。

>> 使用「定位條件」刪除包含空白單元格的行

「定位條件」功能廣泛推薦用於刪除空行。當您需要刪除至少包含一個空白單元格的行時，這是一個有用的工具。

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

1. 選擇您要刪除空行的範圍，選擇「開始」>「查找與選擇」>「定位條件」。

   

   或者您可以直接按下「F5」鍵啟用「定位」對話框，然後點擊「特殊」按鈕切換到「定位條件」對話框。
2. 在「定位條件」對話框中，選擇「空白」選項並點擊「確定」。

   

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

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

1. 右鍵單擊任何選定的單元格，並從上下文菜單中選擇「刪除」（或者您可以使用快捷鍵「Ctrl」+「-」）。

   

2. 在「刪除」對話框中，選擇「整行」選項並點擊「確定」。

   

結果：

>> 使用「篩選」功能刪除在關鍵列中包含空白單元格的行

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

步驟 1：篩選關鍵列中的空白單元格

1. 選擇數據集，點擊「數據」標籤，進入「排序與篩選」組，點擊「篩選」以對數據集應用篩選。

   

2. 點擊您要用於刪除行的關鍵列的「篩選箭頭」。在此示例中，「ID」列是關鍵列，只勾選展開菜單中的「空白」。點擊「確定」。

   

現在，關鍵列中的所有空白單元格都已被篩選出來。

步驟 2：刪除行

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

步驟 3：在排序與篩選組中選擇篩選以清除已應用的篩選

結果：