ich möchte in einem Tabellenblatt in einem ausgewählten/markierten Zellbereich (und nicht auf dem ganzen Tabellenblatt) alle Objekte löschen.
Dieses Makro löscht auf dem ganzen Blatt:
Sub Objekte_loeschen()
ActiveSheet.DrawingObjects.Select
Selection.Delete
Range("A1").Select
End Sub
Irgendwie so ähnlich soll es gehen:Sub Objekte_loeschen_in_Bereich()
In Range.Selection.DrawingObjects.Select
Selection.Delete
Range("A1").Select
End Sub
Lösung/Hilfe wäre nett.Schönen Gruß
Burghard