Wie löscht man Zeilen, die bestimmten Text nicht enthalten, in Excel?

Vielleicht wissen einige von Ihnen, wie man ganze Zeilen löscht, wenn sie bestimmte Texte in Excel enthalten, aber wenn Sie die gesamte Zeile löschen möchten, wenn sie diese bestimmten Texte nicht enthalten, wie könnten Sie das tun? Folgen Sie nun diesem Tutorial, und Sie werden einen Weg finden, dieses Problem in Excel zu lösen.

Zeilen löschen, die bestimmten Text nicht enthalten, mit Filter

Zeilen löschen, die bestimmten Text nicht enthalten, mit VBA

Zeilen löschen, die bestimmten Text nicht enthalten, mit Kutools für Excel

---

Zeilen löschen, die bestimmten Text nicht enthalten, mit Filter

In Excel kann die Filterfunktion Ihnen schnell helfen, die Zeilen herauszufiltern, die bestimmten Text nicht enthalten, und dann können Sie diese auswählen, um sie zu löschen.

1. Wählen Sie die Spalte aus, die die Texte enthält, auf deren Basis Sie Zeilen entfernen möchten, und klicken Sie auf Daten > Filter. Siehe Screenshot:

2. Im Kopf der Spalte befindet sich ein Filter-Button; klicken Sie darauf, um die Dropdown-Liste zu öffnen, und aktivieren Sie alle Optionen außer dem spezifischen Text, auf den Sie basieren möchten. Siehe Screenshot:

3. Dann sehen Sie nur die Kopfzeile und die Zeilen, die den bestimmten Text nicht enthalten, gefiltert. Siehe Screenshot:

4. Wählen Sie alle aus, außer die Kopfzeile, und klicken Sie mit der rechten Maustaste, um „Zeile löschen“ im Kontextmenü auszuwählen. Siehe Screenshot:

5. Klicken Sie dann erneut auf Daten > Filter, und alle Zeilen, die den bestimmten Text nicht enthalten, werden gelöscht. Siehe Screenshot:

---

Zeilen löschen, die bestimmten Text nicht enthalten, mit VBA

VBA ist sehr nützlich für etwas schwierigere Operationen in Excel, und folgen Sie den nachstehenden Schritten, um die Zeilen zu löschen, die bestimmten Text nicht enthalten.

1. Drücken Sie Alt + F11, um das Microsoft Visual Basic for Applications-Fenster anzuzeigen.

2. Klicken Sie im Fenster auf Einfügen > Modul, um ein neues Modulfenster zu öffnen, und kopieren Sie den folgenden VBA-Code in das Modulfenster.

VBA: Gesamte Zeile löschen, wenn Zelle bestimmten Text nicht enthält.

Sub DeleteRowNoInclude()
'Updateby Extendoffice
Dim xRow As Range
Dim rng As Range
Dim WorkRng As Range
Dim xStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xStr = Application.InputBox("Text", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 1 Step -1
    Set xRow = WorkRng.Rows(i)
    Set rng = xRow.Find(xStr, LookIn:=xlValues)
    If rng Is Nothing Then
       xRow.Delete
    End If
Next
Application.ScreenUpdating = True
End Sub

3. Klicken Sie auf Ausführen , und ein Dialogfenster erscheint, in dem Sie einen Bereich zum Bearbeiten auswählen können. Siehe Screenshot:

4. Klicken Sie dann auf OK und geben Sie den Text ein, auf dessen Basis Sie Zeilen entfernen möchten, in ein weiteres Pop-up-Dialogfeld. Siehe Screenshot:

5. Klicken Sie auf OK, und die Zeilen, die „Apple“ nicht enthalten, werden entfernt.

---

Zeilen löschen, die bestimmten Text nicht enthalten, mit Kutools für Excel

Wenn Sie der Meinung sind, dass die oben genannten Methoden nicht einfach genug sind, können Sie die Funktion „Bestimmte Zellen auswählen“ von Kutools für Excel verwenden.

Kutools für Excel umfasst mehr als 300 praktische Excel-Tools. Kostenlos 30 Tage lang ohne Einschränkungen testen. Jetzt herunterladen.

1. Wählen Sie die Spalte aus, in der Sie die Zeilen löschen möchten, die den bestimmten Text nicht enthalten, und klicken Sie auf Kutools > Auswahlwerkzeuge > Bestimmte Zellen auswählen. Siehe Screenshot:

2. Aktivieren Sie im Dialogfeld „ Bestimmte Zellen auswählen“ die Option „Gesamte Zeile“, wählen Sie „ Enthält nicht“ aus, und geben Sie den bestimmten Text in das Textfeld ein. Außerdem können Sie auf die Bereichsschaltfläche im Abschnitt „Typ angeben“ klicken, um die Zelle auszuwählen, die den bestimmten Text enthält.

3. Klicken Sie dann auf OK, dann werden die Zeilen, die den bestimmten Text nicht enthalten, ausgewählt. Klicken Sie mit der rechten Maustaste, um „ Löschen“ im Kontextmenü auszuwählen. Siehe Screenshot:

4. Nun wurden alle Zeilen, die innerhalb des Bereichs keinen bestimmten Text enthalten, entfernt. Klicken Sie hier für weitere Informationen zur Funktion „Bestimmte Zellen auswählen“.

---

Verwandte Artikel:

• Gesamte Zeilen löschen, wenn Zelle keine Null enthält in Excel
• Zeilen löschen, die nicht den Kriterien eines anderen Blatts entsprechen