zu meinem Problem habe ich bereits eine Lösung bekommen,
ActiveCell.EntireRow.Insert
Rows(1).Copy Destination:=Rows(ActiveCell.Row)
aber,
1.Kann man den Befehl auch so schreiben, dass die Zeile eingefügt wird und die bereits bestehenden Zeilen nach unten verschoben werden.(z.Zt. überschreibt er die bestehenden Zeilen)
2.wie müßte der Befehl aussehen, wenn die einzufügenden Zeilen in einem anderen Arbeitsblatt stehen würden
Danke im voraus für Eure Hilfe.