Laufzeitfehler 1004 Anwendungs oder usw.
Daniel
ich habe ein Problem mit meinem VBA Code.
Er soll in einem bestimmten Bereich der Tabelle alle Bilder löschen(welche davor auf Doppelklick eingefügt wurden) .
Der Code funktioniert auch, aber nach einiger Zeit kommt immer der Fehler 1004 (siehe Betreff) Anwendungs oder objektorientierter Fehler.
Weiß jemand bescheid woran das liegt?
mfg daniel
Anbei der Code:
Option Explicit
Sub Bildlöschen()
Dim S As Shape
For Each S In Worksheets("Angaben").Shapes
If Not Intersect(Range("F20:F40"), S.TopLeftCell) Is Nothing Then
S.Delete
End If
Next S
End Sub