Zeilen basierend auf Bedingungen löschen

Anonim

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