ich habe in einer Tabelle mehrere Textfelder und auch Bilder.
Wie kann ich diese auf "einen Wisch" löschen?
Danke vorab
Tom
Sub LoescheAlleGrafikobjekte()
If ActiveSheet.Shapes.Count > 0 Then
ActiveSheet.Shapes.SelectAll
Selection.ShapeRange.Delete
End If
End Sub
Gruß, Dieter(Drummer)