VBA Bild ein- und ausblenden?

[Angelina]

hallo,

ich habe eine Frage bzgl. diesem VBCode

PHP-Code:

If [A1].Value = 1 Then
    Shapes("Bild1").Visible = True
Else
    Shapes("Bild1").Visible = False
End If 


Wenn in A1 die Zahl 1 steht dann soll das Bild1 eingeblenden sein
wenn in A1 keine Zahl steht, dann soll das Bild1 ausgeblenden (nicht sichtbar) sein.

Da ich mich mit Shapes nicht auskenne - nun meine Frage.

Kann man/Frau anstelle Shapes auch einen Pfad angeben wo das Bild1 liegt?

Wenn ja - hätte da jemand ein Beispiel


Danke vorab für eure Hilfe/Zeit

LG
Angelina

[schauan]

Hallo Angelina,

der code setzt voraus, dass sich das Bild schon in der Datei befindet.
Wenn Du einen Pfad angeben willst, dann müsste das Bild auch erst von dort geladen werden. Zusätzlich müsste man prüfen, ob das Bild schon in der Datei vorhanden ist - dann müsste man es nicht nochmal laden. Oder Du löschst es statt es auszublenden.

Allerdings ist das für die Laufzeit suboptimal, immer wieder ein Bild zu laden.

[Angelina]

hallo André,

vielen lieben Dank für deine Rückmeldung.

Ok - habe ich verstanden.
Ich habe auf einem Tabellenblatt einige Grafiken eingefügt.
Nun dachte ich es sei möglich diese Grafiken bei Bedarf z.B. A1=1
ein- und auszublenden.


Danke für deine Antwort

LG
Angelina

[schauan]

Hallo Angelina,

das ist ja auch möglich. Das Stück code, was Du gepostet hast, an der richtigen Stelle eingesetzt, schaltet Dir z.B. bei einer Eingabe der 1 das Bild sichtbar usw. Ich bin jetzt davon ausgegangen, dass das schon funktioniert?