Fehlermeldung Bilder löschen
11.01.2006 11:38:22
gio
bei mir hängt es auch wieder in 2006.
Unteres Makro löscht mir alle Bilder im Bereich innerhalb C396 bis K482.
Es kommt jedoch immer eine Fehlermeldung Bibliothek nicht gefunden.
(bleibt genaubei Bild stehen?)
Wie kann ich Makro ändern, sodaß Bilder gelöscht werden ohne Fehlermeldung.
Vielen Dank im voraus
gio
Sub BilderLöschen()
For Each Bild In ActiveSheet.Shapes
If Bild.Left >= Range("C396").Left And Bild.Left < Range("K482").Left Then Bild.Delete
Next Bild
End Sub
Anzeige