Alle Autoformen löschen
02.12.2004 10:05:24
Michael
Ich habe unzählige Autoformen im Tabellenblatt und möchte diese anhand eines Makros löschen. Wie kann ich diesen Code umschreiben, daß er alle Autoformen im Tabellenblatt anspricht. Mit unterem Code wird nur eine Autoform angesprochen.
Sub löschen()
ActiveSheet.Shapes("AutoShape 993").Select
Selection.Cut
End Sub
Danke für Eure Hilfe
Michael