Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeilen einfügen

Forumthread: Zeilen einfügen

Zeilen einfügen
19.04.2003 22:33:29
rglegacy
Ich habe eine Tabelle mit einem Tabellenbereich von A2:IG2016 und brauche zwischen jeder Zeile eine Leerzeile.
Wie kann ich das mit einem einfachen Makro bewerkstelligen?

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zeilen einfügen
19.04.2003 22:44:21
Ramses

Sub New_Row()
For i = 2 To 4032 Step 2
Rows(i).Insert (xlDown)
Next i
End Sub



Re: Zeilen einfügen
19.04.2003 22:51:50
rglegacy

Danke, haut einwandfrei hin.

Re: Zeilen einfügen
19.04.2003 23:01:03
Meinolf

Hallo rg
versuchs mal hiermit aber vorher Datei sichern

Sub Makro1()

Range("b7").Select 'deine erste reihe bitte anpassen

For i = 1 To 2016

Selection.EntireRow.Insert
ActiveCell.Offset(2, 0).Select

Next

End Sub

Mfg Meinolf


Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige