Wie lassen sich Zeilen löschen, die einen bestimmten Text in Excel nicht enthalten?
Viele Excel-Nutzer kennen das Löschen ganzer Zeilen, wenn diese einen bestimmten Text enthalten. Es kann jedoch vorkommen, dass Sie stattdessen Zeilen entfernen müssen, die nicht diesen bestimmten Text enthalten. Beispielsweise könnten Sie einen umfangreichen Datensatz haben und nur die Zeilen behalten wollen, die mit einem bestimmten Stichwort zusammenhängen – während alle anderen gelöscht werden sollen. Das ist äußerst nützlich für das Filtern von Berichten, die Bereinigung von Umfrageantworten, die Datenqualitätskontrolle und vieles mehr. Obwohl Excel hierfür keine direkte Ein-Klick-Lösung bietet, gibt es mehrere praktische Methoden, die je nach Ihrem Kenntnisstand und Ihren Anforderungen unterschiedliche Vorteile bieten. In diesem Tutorial führen wir Sie Schritt für Schritt durch mehrere effektive Techniken, um Zeilen zu löschen, die eine angegebene Zeichenfolge in Excel nicht enthalten – inklusive Filter-, VBA-, Kutools- und Formelansätzen.
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe des Filters
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe von VBA
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe von Kutools für Excel
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe einer Excel-Formel (Hilfsspalte)
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe des Filters
Die Filterfunktion von Excel bietet eine unkomplizierte und zugängliche Möglichkeit, Zeilen zu identifizieren und zu entfernen, die keinen bestimmten Text enthalten. Sie eignet sich besonders für Nutzer, die einen schnellen visuellen Ansatz bevorzugen, und ist ideal für kleine bis mittelgroße Datentabellen. Bei sehr großen Datensätzen oder stark variierenden Zielpattern kann sie jedoch weniger effizient sein.
1. Wählen Sie die Spalte aus, die den Text enthält, nach dem Sie filtern möchten. Klicken Sie anschließend auf Daten > Filter, um Filter auf Ihre Tabelle anzuwenden. Siehe Screenshot:
 |
 |
 |
2. Klicken Sie auf die Filterschaltfläche (nach unten weisender Pfeil) in der Überschrift der betreffenden Spalte, um das Dropdown-Filtermenü zu öffnen. Deaktivieren Sie alle Optionen außer dem Text, den Sie behalten möchten – es bleiben dann nur Zeilen mitdem gewünschten Text sichtbar. Falls Ihr Text als Teilwert oder Teilzeichenfolge vorkommt, nutzen Sie für mehr Flexibilität die Option „Textfilter“ > „Enthält...“. Siehe Screenshot:
3. Nun werden nur die Überschrift und die Zeilen mit dem angegebenen Text angezeigt; alle anderen Zeilen, die diesen Text nicht enthalten, sind in der aktuellen Ansicht ausgeblendet. Siehe Screenshot:
4. Markieren Sie alle sichtbaren Zeilen außer der Überschrift (klicken Sie dazu auf die erste Zeile, halten Sie die Umschalttaste gedrückt und klicken Sie auf die letzte Zeile), klicken Sie dann mit der rechten Maustaste und wählen Sie im Kontextmenü Zeile löschen. Dadurch werden die sichtbaren (gefilterten) Zeilen entfernt. Nach dem Löschen sind möglicherweise nur noch die ausgeblendeten Zeilen sichtbar – also jene, die den angegebenen Text nicht enthalten.
5. Um den Vorgang abzuschließen, klicken Sie erneut auf Daten > Filter, um den Filter zu deaktivieren. Danach sehen Sie, dass in Ihrem Arbeitsblatt nur noch Zeilen ohne den angegebenen Text verbleiben. Siehe Screenshot:
 |
|
 |
Hinweis: Stellen Sie vor dem Löschen sorgfältig sicher, dass tatsächlich nur die gewünschten Zeilen ausgewählt sind. Gelöschte Zeilen können nicht wiederhergestellt werden – es sei denn, Sie machen die Aktion sofort rückgängig (Strg+Z). Diese Methode eignet sich nicht gut für Tabellen mit zusammengeführten Zellen oder verschachtelten Zwischensummen.
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe von VBA
Wenn Sie große Datensätze verarbeiten oder den Vorgang häufig wiederholen müssen, beschleunigt VBA (Visual Basic for Applications) den Löschprozess erheblich. Mit einer VBA-Lösung automatisieren Sie das Entfernen von Zeilen basierend darauf, ob Zellen bestimmte Textzeichenfolgen enthalten – oder eben nicht. Ideal für Anwender mit grundlegenden Programmierkenntnissen oder wenn Sie die Logik individuell anpassen möchten (z. B. mit Groß-/Kleinschreibungsunterscheidung).
1. Drücken Sie Alt + F11, um das Microsoft Visual Basic for Applications-Editorfenster zu öffnen.
2. Klicken Sie im Editorfenster auf Einfügen > Modul, um ein neues Modulfenster zu öffnen. Kopieren Sie den folgenden VBA-Code, und fügen Sie ihn in das Modulfenster ein.
VBA: Löschen Sie die gesamte Zeile, wenn die Zelle nicht einen bestimmten Text 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 die Ausführen-Schaltfläche. Anschließend erscheint ein Dialogfeld, in dem Sie den zu verarbeitenden Bereich auswählen (z. B. die Spalte, in der nach dem angegebenen Text gesucht werden soll). Siehe Screenshot:
4. Klicken Sie auf OK, und geben Sie im nächsten Popup-Dialog den Text ein, den Sie als Löschkriterium verwenden möchten. Geben Sie den Text zur besten Ergebnisqualität exakt so ein, wie er in Ihren Daten erscheint. Der Code führt standardmäßig eine Suche durch, bei der Groß- und Kleinschreibung nicht unterschieden wird; passen Sie den Code entsprechend an, falls Sie eine solche Unterscheidung benötigen. Siehe Screenshot:
5. Klicken Sie auf OK, und alle Zeilen, deren Zelle den angegebenen Text (z. B. „Apple“) nicht enthält, werden sofort gelöscht. Stellen Sie sicher, dass Sie Ihre Arbeit vor dem Ausführen von VBA-Makros speichern – dieser Vorgang lässt sich nämlich nicht einfach rückgängig machen. Sollten unerwartete Ergebnisse auftreten, nutzen Sie die Rückgängig-Funktion (Strg+Z) oder schließen Sie die Datei ohne Speichern und versuchen Sie es erneut mit den korrekten Parametern. Fortgeschrittene Nutzer können den Code bei Bedarf für Teilübereinstimmungen oder mehrere Kriterien anpassen.
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe von Kutools für Excel
Für Nutzer, die manuelles Filtern oder VBA vermeiden möchten, bietet Kutools für Excel eine effiziente, interaktive Möglichkeit, mit nur wenigen Klicks schnell diejenigen Zeilen auszuwählen und zu löschen, die keinen bestimmten Text enthalten. Das ist besonders hilfreich, wenn Sie Daten häufig verarbeiten oder mit mehreren Suchbedingungen arbeiten. Obwohl Kutools eine Installation erfordert, vereinfacht es komplexe Excel-Vorgänge erheblich und unterstützt Batch-Aktionen – dank seiner intuitiven und anfängerfreundlichen Bedienung.
Kutools für Excel umfasst mehr als 300 nützliche Excel-Tools – kostenlos und uneingeschränkt 30 Tage lang testen! Jetzt herunterladen
1. Wählen Sie die Spalte aus, in der Sie Zeilen löschen möchten, die den angegebenen Text nicht enthalten, und klicken Sie anschließend auf Kutools > Auswahlwerkzeuge > Bestimmte Zellen auswählen. Siehe Screenshot:
2. Aktivieren Sie im Bestimmte Zellen auswählen-Dialogfeld die Option Ganze Zeile, wählen Sie im Dropdown-Menü Enthält nicht und geben Sie den Zieltext in das Textfeld ein. Alternativ können Sie auf das Bereichsauswahl-Symbol im Typ angeben-Abschnitt klicken, um eine Referenzzelle mit dem gewünschten Text auszuwählen. Prüfen Sie Ihre Eingabe sorgfältig auf Tippfehler oder zusätzliche Leerzeichen, da diese die Auswahlgenauigkeit beeinträchtigen können.
3. Klicken Sie auf OK. Die Zeilen, die den definierten Text nicht enthalten, werden automatisch ausgewählt. Klicken Sie mit der rechten Maustaste auf eine beliebige der hervorgehobenen Zeilen und wählen Sie im Kontextmenü Löschen. Dadurch werden alle ausgewählten Zeilen auf einmal gelöscht. Siehe Screenshot:
4. Nun wurden alle Zeilen im ausgewählten Bereich, die Ihren angegebenen Text nicht enthielten, aus Ihrem Arbeitsblatt gelöscht. Weitere fortgeschrittene Tipps und aktuelle Funktionen finden Sie in der:Bestimmte Zellen auswählen-Dokumentation.
Tipp: Überprüfen Sie Ihre Auswahl vor dem Löschen, um versehentlichen Datenverlust zu vermeiden, und erstellen Sie zur Sicherheit eine Sicherungskopie. Die Auswahl-Funktion von Kutools lässt sich zudem ideal mit anderen Funktionen kombinieren – für noch individuellere Datenverwaltung.
Zeilen löschen nicht enthaltenden bestimmten Text mithilfe einer Excel-Formel (Hilfsspalte)
Eine weitere äußerst praktische Methode ist die Verwendung einer Excel-Formel in einer Hilfsspalte. So können Sie rasch prüfen, ob jede Zeile einen bestimmten Text enthält (oder nicht enthält), und anschließend gezielt filtern oder löschen. Diese Vorgehensweise eignet sich ideal für Nutzer, die mit Formeln vertraut sind und einen transparenten, nachvollziehbaren Prozess bevorzugen, um die Ergebnisse vor dem Löschen zu validieren. Besonders nützlich ist sie, wenn Ihr Suchtext innerhalb einer Zelle an beliebiger Stelle vorkommen kann – also nicht nur als exakte Übereinstimmung erforderlich ist.
Vorteile: Sehr flexibel, benötigt keine Add-Ins oder VBA und ist sicher, da die Daten nicht sofort gelöscht werden – der Benutzer prüft zunächst die Ergebnisse.Nachteil: Mehrschrittiges Verfahren, das gewisse Kenntnisse im Umgang mit Excel-Formeln und -Filtern voraussetzt.
Anleitung:
1. Fügen Sie eine neue Hilfsspalte neben Ihren Daten ein. Nehmen Sie zur Veranschaulichung an, dass sich Ihr Text in Spalte A befindet und Ihre Daten ab Zeile 2 beginnen (ohne die Überschrift).
2. Geben Sie in die erste Zeile Ihrer Hilfsspalte (z. B.)B2) die folgende Formel ein (ersetzen Sie „text" durch die gewünschte Suchzeichenfolge):
=ISNUMBER(SEARCH("text",A2))Diese Formel gibt WAHR zurück, wenn die Zelle A2 den angegebenen Text als Teilzeichenfolge enthält (ohne Berücksichtigung der Groß-/Kleinschreibung); andernfalls FALSCH.
3. Drücken Sie die Eingabetaste und doppelklicken Sie danach auf die untere rechte Ecke der Zelle, um die Formel auf alle weiteren Zeilen Ihres Datensatzes zu übertragen.
4. Wenden Sie die Filterfunktion auf die Hilfsspalte an: Klicken Sie auf den Dropdown-Pfeil und wählen Sie FALSCH, um nur die Zeilen anzuzeigen, die den gesuchten Text nicht enthalten. Markieren Sie alle diese gefilterten Zeilen (ohne die Überschrift, falls vorhanden), klicken Sie mit der rechten Maustaste und wählen Sie Zeile löschen.
5. Löschen Sie die ausgewählten Zeilen, heben Sie anschließend den Filter auf, um die Ansicht wiederherzustellen, und überprüfen Sie Ihre Ergebnisse. Entfernen Sie gegebenenfalls die Hilfsspalte.
Hinweise zu Parametern und Tipps:
- Wenn Sie den exakten Zellwert (nicht Teilzeichenfolgen) abgleichen möchten, ändern Sie die Formel zu
=A2="Text". - Enthalten Ihre Daten leere Zellen, gibt ISNUMBER(SEARCH(...)) den Wert FALSCH zurück, und diese Zeilen werden als nicht texthaltend behandelt.
- Um die Groß-/Kleinschreibung zu berücksichtigen, ersetzen Sie SEARCH durch FIND in der Formel.
Fehlerbehebung: Der Formelansatz ist solange nicht destruktiv, bis Sie tatsächlich Zeilen löschen. Prüfen Sie Ihre WAHR/FALSCH-Ergebnisse daher stets sorgfältig und erstellen Sie vor Massenlöschungen unbedingt eine Sicherungskopie.
Verwandte Artikel:
- Löschen Sie Ganze Zeile, wenn die Zelle in Excel keine Null enthält
- Zeilen löschen erfüllt Kriterien auf einem anderen Blatt nicht
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins