Grafik n. löschen
15.03.2004 21:04:23
helena
denke ich kleineres problem, habe auf Blatt Combobox
eine Grafik (Bild 179) und Buttons(AF) habe jetzt Grafik ausgetauscht
vorher lief es ????
ActiveSheet.Copy
For Each shp In ActiveSheet.Shapes
If shp.Name <> "Object 1" Then
shp.Delete
End If
Next
Grafik (Logo) muss natürlich auf Blatt bleiben, es fällt mir auf
die alte Grafik war "eingebettet" und dies schaffe ich nach dem Tausch nicht mehr
DANKE
gruss helena