Zellen einfügen
31.10.2007 11:53:47
Carsten
ich habe folgendes Problem: ich moechte mehrere Zellen ueber ein Makro kopieren und an einer bestimmten Stelle im selben Arbeitsblatt einfuegen. Bis jetzt habe ich folgendes Makro:
Private Sub CommandButton2_Click()
Rows("15:18").Copy Destination:=Range("A20")
End Sub
Wie kann ich dieses Makro erweitern oder abaendern, dass bei einem erneuten Klick auf den Command Button wiederum die Zeilen 15 bis 18 kopiert und wieder an die Stelle A20 eingefuegt, wobei die bereits mit dem ersten Klick erzeugten Zellen verschoben werden sollen.
Fuer Vorschlaege waere ich sehr dankbar
Viele Gruesse
Carsten
Anzeige