Wie kann man Zeilen mit negativen Werten in Excel löschen?

Angenommen, Sie haben den folgenden Datenbereich und möchten die gesamten Zeilen löschen, wenn die Zahl in Spalte B negativ ist. Gibt es gute Methoden, um dieses Problem in Excel zu lösen?

Zeilen mit negativen Zahlen mithilfe von VBA-Code löschen Zeilen mit negativen Zahlen mithilfe von Kutools für Excel löschen

Zeilen mit negativen Zahlen mithilfe von VBA-Code löschen

Der folgende VBA-Code kann Ihnen helfen, die gesamten Zeilen zu löschen, wenn es negative Zahlen in einer bestimmten Spalte gibt. Bitte gehen Sie wie folgt vor:

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.

2. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein.

VBA-Code: Zeilen mit negativen Zahlen löschen

Sub Deleter()
'updatebyExtendoffice
    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:", "Kutools for Excel", 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, "Kutools for Excel"
        GoTo Sel
    End If
    If xRg.Columns.Count > 1 Then
        MsgBox "does not support multiple columns, please select again", vbInformation, "Kutools for Excel"
        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. Drücken Sie dann die F5-Taste, um diesen Code auszuführen. Im Eingabeaufforderungsfenster wählen Sie bitte die Nummerspalte aus, in der Sie die negativen Zahlen finden möchten, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, die Zeilen mit negativen Zahlen werden sofort gelöscht.

Zeilen mit negativen Zahlen mithilfe von Kutools für Excel löschen

Um diese Aufgabe zu bewältigen, kann auch die Funktion Bestimmte Zellen auswählen von Kutools für Excel Ihnen helfen. Mit diesem Hilfsmittel können Sie zunächst die gesamten Zeilen auswählen, die negative Werte enthalten, und dann die ganzen Zeilen nach Bedarf löschen.

Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:

1. Wählen Sie die Spalte aus, die die negativen Zahlen enthält, die Sie löschen möchten.

2. Klicken Sie dann auf Kutools > Auswählen > Bestimmte Zellen auswählen, siehe Screenshot:

3. Wählen Sie im Dialogfeld Bestimmte Zellen auswählen die Option Gesamte Zeile im Auswahltyp aus, und wählen Sie dann Kleiner als aus dem Typ angeben und geben Sie 0 in das Textfeld neben dem Kriterium ein, siehe Screenshot:

4. Klicken Sie dann auf OK, die Zeilen, die negative Zahlen enthalten, werden sofort ausgewählt. Klicken Sie dann auf Start > Löschen > Ganze Zeilen löschen, um die ausgewählten Zeilen nach Bedarf zu löschen, siehe Screenshots:

Tipp: Sie können auch mit der rechten Maustaste klicken, um Löschen aus dem Kontextmenü auszuwählen, um die ausgewählten Zeilen zu löschen.