VBA Zeile löschen - So löschen Sie eine Zeile in Excel VBA?

• VBA Zeile löschen

VBA Zeile löschen

In Excel können Sie jede Zeile löschen, indem Sie die Tastenkombination STRG + - verwenden. Alternativ können Sie die Zeile auswählen und mit der rechten Maustaste darauf klicken und sie löschen. Aber in VBA haben wir es getan, indem wir einen Code dafür geschrieben haben. Die Methode zum Löschen einer Zeile in VBA besteht darin, zunächst zu ermitteln, welche Zeile gelöscht werden soll, und diese dann zu löschen. In diesem Artikel erfahren Sie mehr über verschiedene Abbildungen zum Löschen einer Zeile in VBA.

In VBA wird die Option Zeile löschen verwendet, um je nach Situation entweder eine Reihe von Zeilen oder eine einzelne Zeile zu löschen. Ähnlich wie bei einem Excel-Arbeitsblatt können Sie Makros oder VBA verwenden, um die Zeilen in einem Excel-Arbeitsblatt zu löschen. Dies hilft, wenn viele Daten bei uns sind und wir dies nicht manuell tun können.

Syntax zum Löschen einer Zeile in Excel VBA

Die Syntax zum Löschen einer Zeile in Excel lautet wie folgt.

Arbeitsblätter.Zeilen (Zeilennummer). Löschen

Es gibt auch andere Methoden zum Löschen von Zeilen mithilfe von VBA, z. B. die folgenden.

Bereich ("Zelle"). EntireRow.Delete

Mit der obigen Anweisung wird die Zeile für die angegebene Zeile gelöscht. Wenn wir beispielsweise Range ("A1"). EntireRow.Delete schreiben, wird die erste Zeile gelöscht, da Zelle A1 zur ersten Zeile gehört.

Wir können auch Rows (row_num) .delete verwenden, um eine Zeile zu löschen.

So löschen Sie eine Zeile in Excel mit VBA?

Im Folgenden finden Sie einige Beispiele zum Löschen einer Zeile in Excel mithilfe von VBA.

Sie können diese VBA-Excel-Vorlage zum Löschen von Zeilen hier herunterladen - VBA-Excel-Vorlage zum Löschen von Zeilen

VBA Delete Row - Beispiel # 1

Verwenden Sie die erste einfache Methode, um Zeilen zu löschen. Zu Demonstrationszwecken gebe ich einen zufälligen Wert in die Zellen A1 und B1 ein. Schauen Sie sich das unten an.

Was ich sehen möchte, ist, wenn ich den Code verwende, der über der gesamten Zeile geschrieben wird, wird gelöscht oder eine einzelne Zelle wird gelöscht.

Hinweis: Um Excel VBA verwenden zu können, muss die Registerkarte "Entwickler" auf der Registerkarte "Dateien" im Abschnitt "Optionen" aktiviert sein.

Führen Sie die folgenden Schritte aus, um Zeilen in Excel mit VBA zu löschen.

Schritt 1: Klicken Sie auf der Registerkarte des Entwicklers auf Visual Basic, um den VBA-Editor zu öffnen.

Schritt 2: Deklarieren Sie im Codesegment eine Unterfunktion, um mit dem Schreiben des Codes zu beginnen.

Code:

 Sub Sample () End Sub 

Schritt 3: Schreiben Sie nun den folgenden Code, um die Zeile zu löschen.

Code:

 Sub Sample () Range ("A1"). EntireRow.Delete End Sub 

Schritt 4: Führen Sie diesen Code aus, indem Sie die Taste F5 oder Ausführen drücken und die Ausgabe anzeigen.

Sobald wir den Code ausgeführt haben, können wir sehen, dass die Werte aus den Zellen A1 und B1 entfernt werden, da die gesamte erste Zeile gelöscht wurde.

VBA Delete Row - Beispiel # 2

Zuvor im ersten Beispiel habe ich nur eine einzelne Zeile gelöscht. Aber was ist, wenn wir mehrere Zeilen löschen müssen? Zu Demonstrationszwecken habe ich die folgenden Daten wie unten gezeigt,

Ich möchte alle ersten fünf Zeilen löschen. Führen Sie die folgenden Schritte aus, um die Excel-Zeile mit VBA zu löschen.

Schritt 1: Klicken Sie auf der Registerkarte des Entwicklers auf Visual Basic, um den VBA-Editor zu öffnen.

Schritt 2: Deklarieren Sie im Code eine Unterfunktion, um mit dem Schreiben des Codes zu beginnen.

Code:

 Sub Sample1 () End Sub 

Schritt 3: Schreiben Sie den folgenden Code, um die gesamten fünf Zeilen zu löschen.

Code:

 Sub Sample1 () Range ("A1: B5"). EntireRow.Delete End Sub 

Schritt 4: Führen Sie diesen Code aus, indem Sie die Taste F5 oder Ausführen drücken und die Ausgabe anzeigen.

Sobald wir den Code ausführen, sehen wir das folgende Ergebnis: Die gesamten Daten wurden gelöscht, dh die ersten fünf Zeilen wurden gelöscht, da wir Daten in den ersten fünf Zeilen hatten.

Hinweis: Ich werde die Daten zur Demonstration wieder in das Excel-Beispielblatt einfügen.

VBA Delete Row - Beispiel # 3

Jetzt haben wir Daten für Mitarbeiter und ihre Verkäufe erfolgen in drei Monaten, Januar, Februar und März. Einer der Angestellten war in Urlaub und konnte drei Monate lang keine Verkäufe tätigen, daher sind die Zellen für ihn leer. Unser Ziel ist es, diese leere Zeile zu finden und aus den Daten zu löschen.

Schauen Sie sich die Daten unten an,

Führen Sie die folgenden Schritte aus, um die Excel-Zeile mit VBA zu löschen.

Schritt 1: Klicken Sie auf der Registerkarte des Entwicklers auf Visual Basic, um einen Visual Basic-Editor zu öffnen.

Schritt 2: Deklarieren Sie die Unterfunktion im Codefenster, um mit dem Schreiben des Codes zu beginnen.

Code:

 Sub Sample2 () End Sub 

Schritt 3: Schreiben Sie den folgenden Code, um die Zeilen mit leeren Zellen zu löschen.

Code:

 Sub Sample2 () Range ("A1: D5"). SpecialCells (xlCellTypeBlanks) .EntireRow.Delete End Sub 

SpecialCells ist eine Funktion in VBA, die alle Zellen zurückgibt, die unseren Bedingungen entsprechen, und unsere Bedingung waren die leeren Zellen in diesem Bereich. Daher haben wir eine xlCellTypeBlanks-Funktion verwendet.

Schritt 4: Führen Sie diesen Code aus, indem Sie die Taste F5 oder Ausführen drücken und die Ausgabe anzeigen.

Sobald wir den Code ausgeführt haben, können wir sehen, dass die Zeile mit den leeren Zellen gelöscht wurde.

Hinweis: Ich werde die Daten zur Demonstration wieder in das Excel-Beispielblatt einfügen.

VBA Delete Row - Beispiel 4

Es gibt einige andere ähnliche Methoden zum Löschen der Zeilen, z. B. die Verwendung der Zeilen- und Löschfunktion. Zum Beispiel haben wir Daten in Zeile 4 und ich möchte Zeile 4 löschen. Wir können einen Excel-Befehl geben, um die 4. Zeile in den Daten zu löschen. Schauen Sie sich den Screenshot unten an. Ich habe zufällige Daten in Zeile 4 in der ersten Zelle.

Führen Sie die folgenden Schritte aus, um die Excel-Zeile mit VBA zu löschen.

Schritt 1: Öffnen Sie den VBA-Editor, indem Sie auf der Registerkarte des Entwicklers auf Visual Basic klicken.

Schritt 2: Deklarieren Sie die Unterfunktion, um mit dem Schreiben des Codes zu beginnen.

Code:

 Sub Sample3 () End Sub 

Schritt 3: Schreiben Sie den folgenden Code, um die 4. Zeile zu löschen.

Code:

 Sub Sample3 () Rows (4) .Delete End Sub 

Schritt 4: Führen Sie diesen Code aus, indem Sie die Taste F5 oder Ausführen drücken und die Ausgabe anzeigen.

Daten wurden gelöscht, da die 4. Zeile selbst gelöscht wurde.

VBA Delete Row - Beispiel # 5

Im obigen Code haben wir den Bereich oder die Zeile angegeben, die im Code selbst gelöscht werden sollen. Nehmen wir nun die Eingaben des Benutzers, der die Zeile aus den angegebenen Daten löschen kann. Zum Beispiel habe ich Daten von Mitarbeitern und Verkäufen wie unten und ich möchte, dass ein Benutzer den Bereich auswählt, aus dem er die Zeilen mit leeren Zellen löschen möchte. Werfen Sie einen Blick auf die unten stehenden Daten,

Führen Sie die folgenden Schritte aus, um die Excel-Zeile mit VBA zu löschen.

Schritt 1: Öffnen Sie den VB-Editor, indem Sie auf der Registerkarte des Entwicklers auf Visual Basic klicken.

Schritt 2: Deklarieren Sie eine Unterfunktion, um den Code zu schreiben.

Code:

 Sub Sample4 () End Sub 

Schritt 2: Deklarieren Sie zwei Variablen als Bereich A und B.

Code:

 Sub Sample4 () Dim A As Range Dim B As Range End Sub 

Schritt 3: Um vom Benutzer Eingaben für eine Auswahl von zu löschenden Bereichen zu erhalten, verwenden wir die Eingabefeldfunktion und speichern diese Eingaben in einer oben definierten Variablen.

Code:

 Sub Sample4 () Dim A als Bereich Dim B als Bereich Set A = Application.InputBox ("Select Data", "Sample Macro", Typ: = 8) End Sub 

Schritt 4: Stellen Sie B = A ein, damit die Benutzereingaben in Bereich B gespeichert werden können.

Code:

 Sub Sample4 () Dim A als Bereich Dim B als Bereich Set A = Application.InputBox ("Select Data", "Sample Macro", Type: = 8) Set B = A End Sub 

Schritt 5: Jetzt werden die Daten mit leeren Zellen aus dem vom Benutzer ausgewählten Bereich gelöscht.

Code:

 Sub Sample4 () Dim A als Bereich Dim B als Bereich Set A = Application.InputBox ("Select Data", "Sample Macro", Typ: = 8) Set B = A A.SpecialCells (xlCellTypeBlanks) .EntireRow.Delete End Sub 

Schritt 6: Führen Sie nun den Code über die bereitgestellte Schaltfläche aus.

Schritt 6: Ein Eingabefeld erscheint.

Schritt 7: Wählen Sie in diesem Beispiel den Bereich von A1: D8. Drücken Sie OK, um das Ergebnis anzuzeigen.

Die Daten mit leeren Zellen wurden gelöscht.

Dinge, an die man sich erinnern sollte

In Bezug auf Delete Row in Excel VBA müssen wir einige Dinge beachten:

• Wir können die Zeile basierend auf einer einzelnen Zelle löschen.
• Wir können mehrere Zeilen löschen, indem wir einen Zellbereich angeben.
• Wir können Zeilen auch löschen, indem wir Eingaben vom Benutzer übernehmen.

Empfohlene Artikel

Dies war ein Leitfaden für VBA Delete Row. Hier haben wir das Löschen von Zeilen in Excel VBA zusammen mit praktischen Beispielen und einer herunterladbaren Excel-Vorlage besprochen. Sie können auch unsere anderen Artikelvorschläge durchgehen -

1. Wie verwende ich die Ersetzungsfunktion in VBA?
2. Excel Delete Row Shortcut
3. VBA-Gehäuse | Excel-Tricks
4. Excel Insert Row Shortcut
5. Wie summiere ich mehrere Zeilen in Excel?