如果單元格在Excel中包含零，如何刪除整行？

如果單元格在Excel中包含零，如何刪除整行？

有時，如果在Excel中該單元格包含零，則希望刪除整行，如果其中包含幾個單元格，則可以將它們一一刪除。 但是，需要刪除幾百行包含零的行嗎？ 您可以選擇以下一種棘手的方法來解決它。

如果單元格中包含零與Excel中的篩選器功能刪除行

如果Excel中的VBA單元格包含零，則刪除行

如果單元格包含零則刪除行 Kutools for Excel 如果單元格中包含零與Excel中的篩選器功能刪除行

您可以使用“過濾器”功能基于某一列中的零值過濾掉所有行，然后在以后刪除所有可見行。 請執行以下操作。

1.選擇包含要刪除其整個行的零值的列單元格，然后單擊 Data > 篩選器。 看截圖：

2.然后，在所選列的第一個單元格中顯示一個下拉箭頭，單擊箭頭，然后選擇 號碼過濾器 > 等于 從下拉列表中選擇。

3.在 自定義自動篩選 對話框中，輸入數字 0 進入文本框，如下圖所示，然后單擊 OK 按鈕。

4.然后，該特定列中的所有零值單元格將被過濾掉。 請選擇過濾器范圍內的所有可見單元格，然后右鍵單擊它們，選擇 刪除行 從右鍵單擊菜單中。 然后在彈出的提示框中，點擊 OK 按鈕。 看截圖：

5.現在，所有可見行均被刪除。 您可以點擊 Data > 篩選器 再次顯示所有沒有零值單元格的數據。 看截圖：

如果Excel中的VBA單元格包含零，則刪除行

本節將向您展示VBA方法，以刪除Excel中某一列中存在零值的所有行。

1。 按 Alt + F11鍵 同時顯示 Microsoft Visual Basic應用程序 窗口。

2.在“ Microsoft Visual Basic for Applications”窗口中，單擊“ 插頁 > 模塊，然后將以下VBA代碼復制并粘貼到模塊窗口中。

VBA：如果工作表中的某些列范圍內存在零值，則刪除整個行

Sub DeleteZeroRow() Updateby20140616 Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = “KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) Application.ScreenUpdating = False Do Set Rng = WorkRng.Find("0", LookIn:= xlValues) If Not Rng Is Nothing Then Rng.EntireRow.Delete End If Loop While Not Rng Is Nothing Application.ScreenUpdating = True 結束子

3。 按 F5 運行代碼的鍵，在彈出的 Kutools對于Excel 對話框中，根據其中的零值選擇要刪除整個行的列范圍，然后單擊 OK 按鈕。 看截圖：

然后，將立即刪除基于指定列范圍內零值的所有行。

如果單元格包含零則刪除行 Kutools for Excel

對于許多Excel用戶，使用VBA代碼在Excel中刪除數據很危險。 如果您不完全信任VBA代碼，我們建議您在此處嘗試 選擇特定的單元格 實用程序 Kutools for Excel.

1.選擇列范圍，您將基于其中的零值刪除整個行，然后單擊 Kutools > 選擇 > 選擇特定的單元格。 看截圖：

2.在 選擇特定的單元格 對話框，您需要：

3.彈出一個對話框，告訴您已選擇了多少行，單擊 OK 按鈕。 現在，所有具有零值的行都位于指定的列范圍內。 請右鍵單擊任何選定的行，然后單擊 刪除 在右鍵菜單中。 看截圖：

現在，指定列中存在的所有值為零的行將立即刪除。 看截圖：

如果單元格包含零則刪除行 Kutools for Excel 相關文章： 刪除Excel中不包含某些文本的行？