So fügen sie mit vba mehrere zeilen ein

Sie können die folgenden Methoden verwenden, um mit VBA mehrere Zeilen in Excel einzufügen:

Methode 1: Zeilen in einem bestimmten Bereich einfügen

 SubInsertMultipleRows ()
Worksheets(" Sheet1 ").Range(" 5:7 ").EntireRow.Insert
End Sub

Dieses spezielle Makro fügt drei leere Zeilen im Bereich 5 bis 7 des Blattes mit dem Namen Sheet1 ein und verschiebt alle vorhandenen Zeilen nach unten.

Methode 2: Zeilen basierend auf einer aktiven Zelle einfügen

 SubInsertMultipleRows ()
ActiveCell.EntireRow.Resize(3).Insert Shift:=xlDown
End Sub

Dieses spezielle Makro fügt drei leere Zeilen ein, beginnend mit der Zelle, die Sie aktuell in Ihrem Arbeitsblatt ausgewählt haben, und verschiebt alle vorhandenen Zeilen nach unten.

Die folgenden Beispiele zeigen, wie Sie jede Methode in der Praxis mit der folgenden Tabellenkalkulation in Excel anwenden können:

Beispiel 1: Zeilen in einem bestimmten Bereich einfügen

Wir können das folgende Makro erstellen, um drei leere Zeilen im Bereich 5 bis 7 des Blattes namens Sheet1 einzufügen und alle vorhandenen Zeilen nach unten zu verschieben:

 SubInsertMultipleRows ()
Worksheets(" Sheet1 ").Range(" 5:7 ").EntireRow.Insert
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass an den Zeilenpositionen 5 bis 7 drei leere Zeilen in das Arbeitsblatt eingefügt wurden.

Die bisher in diesen Zeilen vorhandenen Werte wurden schlicht abgesenkt.

Beispiel 2: Zeilen basierend auf einer aktiven Zelle einfügen

Nehmen wir an, Zelle A3 ist derzeit in meiner Tabelle ausgewählt.

Wir können das folgende Makro erstellen, um ausgehend von der aktuell ausgewählten Zelle drei leere Zeilen in das Arbeitsblatt einzufügen:

 SubInsertMultipleRows ()
ActiveCell.EntireRow.Resize(3).Insert Shift:=xlDown
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass ab Zeile 3 drei leere Zeilen in das Arbeitsblatt eingefügt wurden.

Die bisher in diesen Zeilen vorhandenen Werte wurden reduziert.

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So finden Sie die zuletzt verwendete Zeile
VBA: So zählen Sie die Anzahl der Zeilen im Bereich
VBA: So zählen Sie die Anzahl der verwendeten Spalten