Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Set HWH = ActiveSheet.Pictures.Insert("F:\img\stop

Forumthread: Set HWH = ActiveSheet.Pictures.Insert("F:\img\stop

Set HWH = ActiveSheet.Pictures.Insert("F:\img\stop
09.09.2004 10:46:13
ray
Hallo,
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
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Set HWH = ActiveSheet.Pictures.Insert("F:\img\stop
Hans
Das Bild sollte doch eigentlich in der Shapes-Auflistung stehen und darüber gelöscht werden können?
Gruß HW
hier die Lösung - wenns interessiert
09.09.2004 13:31:03
ray
Danke HW, shapes war nix.
hab mir diese Lösung gebastelt:
x = 242
For i = 1 To 300
x = x - 1
ActiveSheet.Shapes("Picture " & x).Select
Selection.Delete
next i
Gruß Ray
Next i
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige