Wenn Sie ernsthaft nach einem VBA-Code suchen, der Ihnen hilft, alle Zeilen basierend auf einem bestimmten Text in einer bestimmten Spalte zu löschen, dann ist dieser Artikel für Sie. In diesem Artikel erfahren Sie, wie Sie eine Zeile löschen, wenn der bestimmte Text in einer Spalte gefunden wird.
Frage): Ich habe eine Datei, in der ich nur die Zeilen benötige, die "Produkt B" in Spalte B haben. Ich möchte alles andere löschen. Kann mir bitte jemand helfen ein Makro zu schreiben? Im Folgenden ist die Momentaufnahme der Daten, die wir haben:
Wir müssen die folgenden Schritte ausführen:
- Klicken Sie auf die Registerkarte Entwickler
- Wählen Sie in der Gruppe Code die Option Visual Basic . aus
Geben Sie im Standardmodul folgenden Code ein:
Sub DeleteRow()
Mit Sheet1.Cells(1).CurrentRegion.Columns(2)
.AutoFilter 1, "Produkt B"
.EntireRow.Löschen
Ende mit
End Sub
Code-Erklärung:
Schritt 1) Der obige Code wählt die aktuelle Region aus Spalte 2 aus, d. H. Produktspalte
Schritt 2) Filter anwenden
Schritt 3) Die sichtbaren Zellen werden mit der gesamten Zeile gelöscht. Code löschen. Der Rest der Daten, d. h. wo Produkt B in Spalte B vorhanden ist, wird unsere Ausgabe sein.
Auf diese Weise können wir mit VBA-Code Zeilen löschen, die bestimmte Bedingungen erfüllen.
Download - Zeilen basierend auf Bedingungen löschen - xlsm