Delete Entire Row using VBA – Excel Macro Example Code

Excel VBA code to Delete Entire Row example will help us to delete rows in excel worksheet. Wir können die Delete-Methode von Rows verwenden, um die gesamte Zeile zu löschen. In diesem Beispiel werden wir sehen, wie man die gesamte Zeile in Excel-Arbeitsblatt mit VBA zu löschen. Excel VBA-Makro-Code zum Löschen ganzer Zeilen Makro sollte für alle Version von Microsoft Excel 2003, Excel 2007, Excel 2010 und Excel 2013.

VBA-Code zum Löschen der gesamten Zeile

Hier ist die VBA löschen ganze Zeile Makro Syntax und Beispiel VBA-Makro-Code zum Löschen der gesamten Zeile von Excel-Arbeitsblättern arbeiten. Dies wird Ihnen helfen, zu wissen, wie man ganze Zeile aus Excel-Arbeitsmappe mit VBA löschen.

VBA Delete Entire Row: Syntax

Following is the VBA delete entire row macro Syntax and sample VBA macro command to Delete Entire Row from worksheet using VBA. Wir verwenden die Delete-Methode des Rows-Objekts des Arbeitsblatts.


Rows(

).EntireRow.Delete


Hier ist Row Number die Zeilennummer, die Sie löschen möchten. Und die Methode EntireRow.Delete löscht die gesamte Zeile aus dem Excel-Arbeitsblatt.

Eine ganze Zeile mit VBA löschen: Beispiele

Der folgende Excel-VBA-Makrocode zum Löschen ganzer Zeilen dient zum Löschen ganzer Zeilen aus dem Arbeitsblatt. Diese VBA löschen ganze Zeile Makro wird Zeile, die wir in den Code erwähnt haben, zu löschen.

Sub sbVBS_To_Delete_EntireRow () Rows(1).EntireRow.DeleteEnd Sub

Anweisungen, um die VBA-Makro-Code ausführen, um ganze Zeile zu löschen

Bitte befolgen Sie die folgenden Schritte, um die VBA löschen ganze Zeile Makro ausführen.
Schritt 1: Öffnen Sie eine beliebige bestehende Excel-Arbeitsmappe.
Schritt 2: Drücken Sie Alt+F11 – Dadurch wird der VBA-Editor geöffnet.
Schritt 3: Fügen Sie ein Codemodul aus dem Menü „Einfügen“ ein.
Schritt 4: Kopieren Sie den obigen Code und fügen Sie ihn in das Codemodul ein, das Sie im obigen Schritt eingefügt haben.
Schritt 5: Geben Sie einige Beispieldaten in Zeile 1 ein.
Schritt 6: Drücken Sie nun F5, um den Code auszuführen.

Jetzt können Sie beobachten, dass die gesamte Zeile 1 aus dem Arbeitsblatt gelöscht wird.

Erläuterter VBA-Code zum Löschen der gesamten Zeile:

Start des Programms und der Unterprozedur, um VBA-Code zum Löschen der gesamten Zeile aus dem Blatt zu schreiben.
Sub sbVBS_To_Delete_EntireRow_C()

‚Angabe der zu löschenden Zeilen und Löschen der Zeilen mit der Methode EntireRow.Delete.
Rows(1).EntireRow.Delete

‚Beenden der Sub-Prozedur zum Löschen der gesamten Zeile.
End Sub

Hier ist Rows(1), um Excel zu sagen, dass Zeile 1 des Arbeitsblatts gelöscht wird. Und die Delete-Methode löscht die gesamte Zeile aus dem Arbeitsblatt.

VBA zum Löschen der gesamten Zeile in Excel :

Wenn Sie die ersten paar Zeilen in Excel löschen möchten, können Sie den Löschbefehl mehrmals wiederholen. Das folgende Beispiel für ein VBA-Makro zum Löschen der gesamten Zeile zeigt Ihnen, wie Sie die ersten drei Zeilen im Arbeitsblatt löschen können.

Sub sbVBS_To_Delete_FirstFewRows_in_Excel() Rows(1).EntireRow.Delete Rows(1).EntireRow.Delete Rows(1).EntireRow.DeleteEnd Sub

In diesem Beispiel sehen Sie, dass der Löschbefehl dreimal wiederholt wird. Zuerst wird die erste Zeile gelöscht, wenn wir die erste Zeile löschen. Die nächste Zeile wird (2. Zeile) die erste Zeile. Wenn Sie also die erste Zeile erneut löschen. Die nächste Zeile (3. Zeile) wird zur ersten Zeile. Das heißt, wir haben die ersten drei Zeilen mit VBA gelöscht.

VBA zum Löschen der gesamten Zeile in Excel: VBA-Code erklärt

Hier ist die Erklärung des VBA-Makros zum Löschen der ersten drei Zeilen in Excel.

Starten Sie die Prozedur, um VBA-Befehle zum Löschen der ersten paar (3) Zeilen zu schreiben.
Sub sbVBS_To_Delete_FirstFewRows_in_Excel_C()

‚Erste Zeile wird gelöscht
Rows(1).EntireRow.Delete
‚Jetzt wird die zweite Zeile zur ersten Zeile – wieder wird die erste Zeile gelöscht.
Rows(1).EntireRow.Delete
‚Jetzt wird die dritte Zeile zur ersten Zeile – wieder wird mit dem Löschbefehl die erste Zeile gelöscht.
Rows(1).EntireRow.Delete
‚Wir haben die ersten 3 Zeilen gelöscht und beenden die Sub-Prozedur hier.
End Sub

VBA to Delete Entire Row in Excel : Using For Loop

Hier ist das Beispiel VBA-Makro zum Löschen der ersten paar Zeilen mit For Loop. Dies wird die ersten 10 Datensätze mit For-Schleife in VBA zu löschen.

Sub sbVBS_To_Delete_EntireRow_For_Loop()Dim iCntr For iCntr = 1 To 10 Step 1 Rows(1).EntireRow.Delete NextEnd Sub

VBA zu löschen ganze Zeile in Excel: Mit For-Schleife – Erklärung

Hier ist die detaillierte Erklärung der Zeile löschen mit For-Schleife in VBA.

Starten Sie die Sub-Prozedur, um ein VBA-Makro zum Löschen von Zeilen mit Hilfe der VBA for-Schleife zu schreiben.
Sub sbVBS_To_Delete_EntireRow_For_Loop_C()
‚Deklarieren Sie die Variable iCntr, um die for-Schleifenwiederholungen zu speichern.
Dim iCntr
‚Durchlaufen der Zeilen mittels for-Schleife, wobei die Schrittanweisung die Erhöhung von iCntr angibt.
For iCntr = 1 To 10 Step 1
‚Löschen der ersten Zeile.
Rows(1).EntireRow.Delete
Next
‚Wir haben die erste Zeile 10-mal löschen, das heißt, wir haben die ersten 10 Zeilen in Excel-Blatt mit for-Schleife und VBA gelöscht.
End Sub

VBA zu löschen ganze Zeile in Excel : Mit Do while Loop

Hier ist das Beispiel VBA löschen ganze Zeile Makro, um die ersten paar Zeilen mit Do while Loop zu löschen. Dies wird die ersten 10 Datensätze mit For-Schleife in VBA zu löschen.

Sub sbVBS_To_Delete_EntireRow_Do_while_Loop()Dim iCntriCntr = 10 ' Last row Do While iCntr >= 1 Rows(iCntr).EntireRow.Delete iCntr = iCntr - 1 LoopEnd Sub

VBA zu löschen ganze Zeile in Excel : Mit Do while Loop – Erklärung

Hier ist die Erklärung zu den oben genannten VBA löschen ganze Zeile Makro zu löschen Zeilen mit Do while Loop.

Starten des VBA-Makros zum Löschen der Zeilen mit Hilfe der Do while-Schleife.
Sub sbVBS_To_Delete_EntireRow_Do_while_Loop()
‚Deklarieren der Variablen, die die letzte Zeilennummer speichert und als Zählervariable verwendet.
Dim iCntr
‚Zuweisen des letzten Zeilenwerts an iCntr.
iCntr = 10 ‚ Letzte Zeile
‚Mittels do while Schleife löschen wir die Zeilen ab der letzten (10.) Zeile .
Do While iCntr >= 1
Rows(iCntr).EntireRow.Delete
iCntr = iCntr – 1
Loop
‚ending the sub procedure here.
End Sub

Hier können Sie sehen, dass wir in einer Schleife durch die Zeilen von der letzten bis zum Anfang gehen. Dies ist der genaue Code beim Löschen der Zeilen aus dem Arbeitsblatt. Löschen Sie immer von der letzten zur ersten Zeile.