Zellen einfügen mit VBA
14.05.2014 23:28:38
Michael
ich bin es mal wieder und habe ein kleines Problem :-). Also ich möchte über VBA immer 270 neue leere Zellen einfügen. 9 horizontal, 30 vertikal. Ich habe das hier hinbekommen:
Sub Insertcells1()
Worksheets("Zeitstrahl").Range("A2:J2").Insert Shift:=xlDown,
CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
Nun würde ich gerne, dass sich das 30 mal (bzw noch 29 mal ausführt) - ginge das über eine Schleifenfunktion? Noch lieber wäre es mir, zu sehen, wie ich auf einmal 30 den ausgewählten bereich 30 Zeilen tief einfügen kann.
Könntet ihr mir da Tipps geben, das wär' klasse :-)
Viele Grüße
Michael
Anzeige