如何在Excel中刪除包含負值的整行


負值有時會干擾資料分析或計算,刪除它們可能有助於您關注資料的有效部分。無論您處理的是財務記錄、調查結果還是任何其他型別的資料,Excel都提供了有效的選項來過濾掉不需要的包含負值的整行。在本教程中,我們將引導您完成檢測和刪除Excel電子表格中包含負值的行的過程。

刪除Excel中包含負值的整行

在這裡,我們將首先建立一個VBA模組並選擇單元格範圍來完成此任務。讓我們來看一個簡單的過程,學習如何在Excel中刪除包含負值的整行。

步驟1:假設您有一個Excel表格,其中包含一些包含負值的整行,如下所示:

首先,右鍵單擊工作表名稱,然後選擇“檢視程式碼”以開啟VBA應用程式。

右鍵點選 > 檢視程式碼。

步驟2:然後單擊“插入”,選擇“模組”,並將以下程式碼複製到文字框中。

插入 > 模組 > 複製。

示例

Sub Deleter()
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim I As Long
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
Sel:
    Set xRg = Nothing
    Set xRg = Application.InputBox("please select the data range:", "Delete Rows Negative", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "does not support multiple selections, please select again", vbInformation, "Delete Rows Negative"
        GoTo Sel
    End If
    If xRg.Columns.Count > 1 Then
        MsgBox "does not support multiple columns, please select again", vbInformation, "Delete Rows Negativel"
        GoTo Sel
    End If
    For I = xRg.Rows.Count To 1 Step -1
        If xRg.Cells(I) < 0 Then xRg.Cells(I).EntireRow.Delete
    Next
End Sub

步驟3:然後單擊F5執行程式碼,選擇包含負值的單元格範圍,然後單擊“確定”。然後您會看到包含負值的整行將被刪除。

F5 > 選擇單元格 > 確定。

結論

在本教程中,我們使用了一個簡單的示例來演示如何刪除Excel中包含負值的整行以突出顯示特定資料集。

更新於:2023年7月20日

瀏覽量:1000+

啟動您的職業生涯

透過完成課程獲得認證

開始學習
廣告
© . All rights reserved.