Set HWH = ActiveSheet.Pictures.Insert("F:\img\stop
09.09.2004 10:46:13
ray
ich hab mich mal wieder völlig verprogrammiert.
Mit nachfolgenden Code habe ich beim Durchlauf einer Tabelle in jeder Zeile ein Bild im sheet abgelegt. Da ich Hwh nur am Ende vom Prog geschrieben habe, liegtz jetzt fast 1000 mal dieses Bild übereinander im Sheet. Zum deleten will ich natürl nicht 1000 mal anklicken.
Wie kann ich die Img aus einem sheet mit code löschen?
Danke und Gruß aus Hamburg bei blauen Himmel
Ray
'show img
Dim HWH As Object
Set HWH = ActiveSheet.Pictures.Insert("F:\img\stop.bmp")
'Application.Wait (Now + TimeSerial(0, 0, 2))
HWH.Delete