fehler im code
28.07.2004 12:55:36
porbsi
Sub zeile()
' zeile Makro
' Makro am 28.07.2004 von QT30756 aufgezeichnet
Dim i As Integer
i = 2
Do
Rows("i:i").Select --- das hier geht nicht
Selection.Insert Shift:=xlDown
i = i + 2
Loop Until Rows("i:i") = Null
End Sub