HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Entdecke rund 2 Millionen Excel-Lösungen im
Forumsarchiv
Forumbeitrag
Excel-Version des Fragestellers:
2019
Erfahrungslevel des Fragestellers:
Kaum Excel/VBA-Kenntnisse
xlKing
06.05.2026 22:29:39
AW: wenn Zelleninhalt =wahr; dann Bild (Grafik) einfügen
Hi zusammen,

Habe grade erst diesen Thread entdeckt. Bild in Zelle bzw. mit Formel geht in Excel 2019 noch nicht. Erst am O365. Du kannst aber ein ganz normales Bild einfügen, frei auf dem Blatt platzieren, und dann per UDF ein/ausblenden. Dazu im VBA-Editor in ein allgemeines Modul einfach diesen Code einfügen.

Function Bildanzeigen(Bildname As String, Anzeigen As Boolean)

On Error GoTo Fehler
ActiveSheet.Shapes(Bildname).Visible = Anzeigen
Bildanzeigen = Bildname & " wird " & IIf(Anzeigen = False, "nicht ", "") & "angezeigt."
Exit Function
Fehler:
Bildanzeigen = "#Bild " & Bildname & " nicht vorhanden!"
End Function


Danach einfach in eine beliebige Zelle auf dem gleichen Blatt, wo das Bild ist. =BildAnzeigen("Bildname";A1) Den Bildnamen kannst du im Feld links neben der Formelleiste ablesen, wenn du zuvor auf das Bild klickst.

Falls dich die Textausgabe "Bild wird angezeigt" stört, kannst du den Text mit dem Zahlenformat ";;;" ausblenden. Um Falschanzeigen zu vermeiden, solltest du für jeden Bildnamen nur jeweils Eine Formel verwenden. Logisch oder?

Gruß Mr. K.
Als Antwort auf diesen Beitrag
Hans-Georg
03.05.2026 16:14:05
wenn Zelleninhalt =wahr; dann Bild (Grafik) einfügen
Hallo Leute, einen schönen Sonntag euch allen.

Ich möchte, wenn möglich, in meine Tabelle ein Bild ein- beziehungsweise ausblenden, abhängig von einer bestimmten Zelle.

Das hier ist NICHT meine Formel, sondern dient nur der Fragestellung!!
=wenn(A1=WAHR;"Bild einblenden;"")

Vielen Dank für eure Hilfe

Hans-Georg
Folgenachrichten
Antwort auf Beitrag erstellen
Bitte einen Anwendernamen ohne @ eingeben.
Bitte das Passwort eingeben.
Bitte eine gültige E-Mail-Adresse eingeben.
Bitte einen Betreff eingeben.
Weitere Optionen
Aktivieren, wenn die Frage/der Beitrag noch nicht beantwortet wurde und unter Listen > Offene Threads erscheinen soll.
Beispieldatei hochladen

Bitte einen Nachrichtentext eingeben.