Guten Morgen Heinrich,
leider funktioniert es doch nicht.
Habe folgendes ins Makro eingesetzt:
ActiveSheet.Shapes.SelectAll
Selection.Delete
'---- jetzt Command-Button zurück kopieren -----------------
Windows("Werkstatt.xls").Activate
Sheets("Matrix").Select
ActiveSheet.Shapes("CommandButton2").Select
ActiveSheet.Shapes.Range(Array("CommandButton2", "CommandButton3")).Select
ActiveSheet.Shapes.Range(Array("CommandButton2", "CommandButton3", _
"CommandButton1")).Select
Selection.Copy
wollte also löschen und dann die 3 Command-Button kopieren.
Vielleicht kannst Du mir weiterhelfen?
gruß walter