jede 2.Zeile einfügen
08.10.2003 11:28:14
golem
Habe ein Macrorecproblem:
es soll in jede zweite Zeile (ab zeile 6)eine neue Zeile eingefügt werden.
so weit bin ich:
'um eine Zeile einzufügen:
Rows("6:6").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
Versuch:
dim i as integer, b as integer
b=0
for i=0 to 100
b=b+2
Rows("(6+b):6").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
next
Fehlermeldung in Zeile Rows(.....
Wie kann man das Prob lösen?
bitte um Hilfe
goli