fbpx
schieb.de > Tipps > Office > Beliebige Anzahl Zeilen in Excel einfügen

Beliebige Anzahl Zeilen in Excel einfügen

10.03.2015 | Von Ann + J.M.

Office

In eine bestehende Excel-Tabelle lassen sich zwar neue Zeilen einfügen, man kann aber nicht festlegen, wie viele Zeilen hinzugefügt werden sollen. Man muss neue Zeilen aber nicht einzeln einfügen. Mit einem Makro klappt’s auch einfacher.

Damit das im Folgenden erstellte Makro funktioniert, wird die Tabelle als Erstes anders gespeichert. Dazu im Dialogfeld „Speichern unter“ das Klappfeld „Dateityp“ (PC) oder „Dateiformat“ (Mac) öffnen und dort „Excel-Arbeitsmappe mit Makros (.xlsm)“ auswählen. Im Anschluss schaltet man zu „Ansicht, Makros“, gibt einen Namen ein, etwa ZeilenEinfuegen, und klickt dann auf „Erstellen“ (PC) oder das Pluszeichen (Mac). Zwischen den Zeilen „Sub“ und „End Sub“ wird folgender Code eingefügt:

Dim CurrentSheet As Object
For Each CurrentSheet In ActiveWindow.SelectedSheets
CurrentSheet.Range("a1:a5").EntireRow.Insert
Next CurrentSheet

Mit diesem Code werden zuoberst 5 neue Zeilen eingefügt. Die Zahl lässt sich direkt im Code anpassen. Wer die neuen Zeilen nicht ganz oben, sondern weiter unten braucht, passt den Zeilenbereich entsprechend an, etwa „a8:a13“.

excel-neue-zeilen-einfuegen




Jetzt schieb.de Pro Mitglied werden - und PDFs, eBooks und Extras sichern


Mitglieder von schieb.de Pro bekommen jede Woche einen umfangreichen, hochwertigen Report im PDF-Format zugeschickt. Außerdem können Mitglieder kostenlos hochwertige eBooks laden. Und weitere Extras.

Jetzt Mitglied werden. Nur 5 EUR/Monat.

Stichwörter: , , , , , , , , , , ,

Kommentarfunktion gesperrt.