Herbers Excel-Forum - das Archiv
Zeilen einfügen
Betrifft: Zeilen einfügen
von: Holger Meinert
Geschrieben am: 24.09.2003 09:13:23
Hallo Forum,
ich möchte nach jedem Eintrag in Spalte A zwei leere Zeilen einfügen (Schleife).
Vielen Dank !
mfg
Hloger
Betrifft: AW: Zeilen einfügen
von: Mac4
Geschrieben am: 24.09.2003 09:27:42
Hallo Hoger,
so auf die schnelle fällt mir nur so was ein:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Columns(1)) Is Nothing Then
Else
Target.Offset(1, 0).Rows.Insert shift:=xlDown
Target.Offset(1, 0).Rows.Insert shift:=xlDown
End If
End Sub
Marc