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, ist dieser Artikel genau das Richtige für Sie. In diesem Artikel erfahren Sie, wie Sie eine Zeile löschen, wenn der spezifische Text in einer Spalte gefunden wird.

Frage): Ich habe eine Datei, in der ich nur die Zeilen mit „Produkt B“ in Spalte B benötige. Ich möchte alles andere löschen. Kann mir bitte jemand helfen, ein Makro zu schreiben? Es folgt die Momentaufnahme der Daten, die wir haben:

img1

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

img2

aus

===

Geben Sie im Standardmodul den folgenden Code ein:

Sub DeleteRow ()

Mit Sheet1.Cells (1) .CurrentRegion.Columns (2)

EntireRow.Delete End With End Sub

img3

Code Erklärung:

Schritt 1) ​​Der obige Code wählt den aktuellen Bereich aus Spalte 2 aus, d. H.

Produktspalte Schritt 2) Filter anwenden

img4

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.

img5

Auf diese Weise können wir mithilfe von VBA-Code Zeilen löschen, die bestimmte Bedingungen erfüllen.

image 19