wie kann ich von Websiten mitkopierte Objekte (Schaltflächen und TextBoxen) per VBA löschen. Mit folgendem Makro geht es nicht:
Sub Cleaner()
Dim x As Shape
For Each x In ActiveSheet.Shapes
If x.Type = 12 Then x.Delete
Next
End Sub
...obwohl es so bislang immer funktioniert hatte. Ich habe mal eine Beispieldatei hochgeladen:https://www.herber.de/bbs/user/80774.xls
(Im Entwurfsmodus sind auch die TextBoxen sichtbar, deren Visible-Eigenschaft auf False gesetzt ist).
Für Vorschläge bin ich sehr dankbar.
Viele Grüße
Martin