Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
520to524
520to524
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bei Klich in Zelle öffnet sich ein Bild

Forumthread: Bei Klich in Zelle öffnet sich ein Bild

Bei Klich in Zelle öffnet sich ein Bild
24.11.2004 18:21:35
GAST100
Hallo Leute, habe da mal eine Frage:
Wenn ich in Excel bin und in eine Zelle klicke soll so eie art Pop Up aufgehen und es soll ein Bild erscheinen. Das Bild sollte in der Excelmappe sein. Also keine verlinkung. Denke mal ich mach das mit einer User Form. Aber ich bräuchte die Befehle dazu:
-Dass beim klichen in die Zelle A1 die UserForm aufgeht
-User Form schliesen.
Oder geht das irgendwie anders?
Danke für die Hilfe
Tobi
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bei Klich in Zelle öffnet sich ein Bild
24.11.2004 18:35:16
Josef
Hallo Tobi!
Disen Code in der Tabelle.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$A$1" Then
Me.Pictures("Bild 1").Visible = False  'Bildname anpassen
Else
Me.Pictures("Bild 1").Visible = True   'Bildname anpassen
End If
End Sub

Gruß Sepp
Anzeige
AW: Bei Klich in Zelle öffnet sich ein Bild
Tobi
Und wo und wie speicher ich das Bild ab?
Danke
Einfach in die Tabelle einfügen....
24.11.2004 18:55:32
Josef
...und den Namen anpassen!
Gruß Sepp
AW: Einfach in die Tabelle einfügen....
Tobi
Fehlt da was? wie und wo lege ich denn das Bild hin?
Danke Tobi
Anzeige
AW: Einfach in die Tabelle einfügen....
24.11.2004 19:11:35
Josef
Hallo Tobi!
Bist du sicher mit "Excel gut / VBA gut" ?
Also.
1.) Du fügst das Bild das angezeigt werden soll,
über &gt Einfügen &gt Grafik &gt Aus Datei ein.
2.) Diesem Bild gibst du einen Namen, zB. "MeinBild" und
plazierst es an die Stelle deiner Wahl.
3.) Im Makro änderst du "Bild 1" in "MeinBild".
Fertig
Gruß Sepp
Anzeige
Zusatzfrage
25.11.2004 07:53:58
Ernst
Hallo Sepp
Ich hätte da noch eine Zusatzfrage zu Deinem Code.
Wie müsste der Code ergänzt werden, wenn ich weitere Bilder anzeigen möchte, bei Click auf B1 und C1.
mfg
Ernst Dunkel
AW: Zusatzfrage
25.11.2004 10:09:56
Josef
Hallo Ernst!
zB. so.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
''wenn die Bilder ausgeblendet werden sollen, falls eine Zelle
''ausserhal "A1:C1" ausgewählt wird
'Me.Pictures("Bild 1").Visible = False
'Me.Pictures("Bild 2").Visible = False
'Me.Pictures("Bild 3").Visible = False
If Not Intersect(Target, [A1:C1]) Is Nothing Then
'wenn die Bilder sichtbar bleiben sollen, falls eine Zelle
'ausserhal "A1:C1" ausgewählt wird
Me.Pictures("Bild 1").Visible = False
Me.Pictures("Bild 2").Visible = False
Me.Pictures("Bild 3").Visible = False
Select Case Target.Address(0, 0)
Case "A1"
Me.Pictures("Bild 1").Visible = True
Case "B1"
Me.Pictures("Bild 2").Visible = True
Case "C1"
Me.Pictures("Bild 3").Visible = True
Case Else
End Select
End If
End Sub

Gruß Sepp
Anzeige
AW: Zusatzfrage
25.11.2004 16:53:09
Ernst
Hallo Sepp
Vielen Dank für Deine Antwort konnte wieder etwas lernen.
mfg
Ernst Dunkel
;

Forumthreads zu verwandten Themen

Kommenare beim Klick in die leere Zelle anzeigen?
Selma

Hallo Leute,
ich möchte in Zellen der Spalte E und Spalte F die Kommmentare als errechnete Werte beim Klick in die Zelle anzeigen, wenn diese Zelle leer sind. Sind die Zelle gefüllt, dann soll der Kommentar nicht angezeigt werden.
Die Voraussetzung ist, dass in Zelle der Spalte D die Za...
11.10.2008 12:17:00
Thread-ID: 1015730
8 Beiträge
Autofilter und Fotos in einzelnen Zellen
Wolfango

Hallo Experten,
wie lassen sich einzelne Fotos/Grafiken in einzelne Zellen setzen (also nicht nur darüber legen), so dass anschließend noch mit dem Autofilter gefiltert werden kann (Filtern in einer anderen Spalte, nicht die mit den Fotos) und nun auch nur noch Fotos zu den gefilterten Dat...
10.05.2010 23:55:36
Thread-ID: 1156469
2 Beiträge
Anzeige
Bild beim speichern anzeigen
ray

Hallo,
ich möchte eine Grafik beim Speichern auf der Userform anzeigen lassen.
So geht es nciht:
Private Sub ImgSave_Click() Image2.Visible = True ActiveWorkbook.Save Image2.Visible = False End Sub
Image2 wird nicht angezeigt. Hat jemand iene Idee?
Viele Grüße aus H...
28.09.2011 12:04:11
Thread-ID: 1231817
3 Beiträge
Messagebox bei Zellenklick anzeigen
Hans

Hallo Forum,
ich hänge schon seit Stunden an einem Makro rum, welches ich für meine Zwecke umbauen wollte aber es will mir einfach nicht gelingen.
Ziel des Makro soll es sein, wenn ich im Tabellenblatt „Hauptseite“ in die Zelle „AH3“ klicke, soll mir eine Messagebox sagen „Bitte überprü...
24.08.2013 23:50:30
Thread-ID: 1328261
6 Beiträge
Bei Doppelklick anzeigen von bestimmten Zeilen
bestimmten

Hi Leute,
Ich bitte nochmal um eure Hilfe!
In meinem Kalender möchte ich zu den verschiedenen Einträgen Details in einem zweiten Tabellenblatt anzeigen lassen.
Was soll also passieren:
Wenn ich im Tabellenblatt Kalender auf eine bestimmte Zelle der Spalte L klicke, sollen im Ta...
31.10.2016 11:54:25
Thread-ID: 1522388
9 Beiträge
Bild bei Klick anzeigen lassen
Gustavo

Ich würde gerne in Excel einen Namen oder eine Zelle mit einem Bild verknüpfen, optimalerweise wenn man über das Feld/den Namen mit dem Cursor fährt, dass das Bild angezeigt wird. Oder halt wenn man draufklickt. Was gibt es da für Möglichkeiten und wie setze ich dies um? Habe quasi 100 Namen un...
27.05.2017 13:52:30
Thread-ID: 1560636
2 Beiträge
Bild bei Klick anzeigen lassen
Gustavo

Ich würde gerne in Excel einen Namen oder eine Zelle mit einem Bild verknüpfen, optimalerweise wenn man über das Feld/den Namen mit dem Cursor fährt, dass das Bild angezeigt wird. Oder halt wenn man draufklickt. Was gibt es da für Möglichkeiten und wie setze ich dies um? Habe quasi 100 Namen un...
27.05.2017 14:12:47
Thread-ID: 1560639
2 Beiträge
VBA IE Popup öffnen und Bild kopieren
Christian

Hallo, ich benötige etwas Hilfe für einen Code.
https://wertpapiere.ing-diba.de/DE/Showpage.aspx?pageID=25&ISIN=DE0008404005&
Dort das Popup "Chartbild anzeigen" öffnen und den Chart kopieren und in B1 einfügen.
Der Link steht in A1 und soll dann mit einer Schleife nacheinan...
25.07.2017 14:03:28
Thread-ID: 1570771
16 Beiträge
Anzeige
VBA IE Popup öffnen und Bild kopieren (2)
Christian

Weiterführung des ursprünglichen Threads. Kurz nochmal die Zusammenfassung:
https://www.herber.de/bbs/user/115145.xlsm
Ich möchte die anhand der Aktiennamen die entsprechende Seite z.B.
https://wertpapiere.ing-diba.de/DE/Showpage.aspx?pageID=25&ISIN=DE0008404005&
öffnen...
31.07.2017 12:30:10
Thread-ID: 1571714
5 Beiträge
Anzeige
Sub Bild3_BeiKlick()
Bello

Hallo Forum,
ich habe da mal eine Frage.
ich habe folgendes Makro:
Sub Bild3_BeiKlick() ActiveSheet.Range("B10") = 1 ActiveSheet.Range("B10").Select End Sub
dieses Makro funktioniert auch ganz gut, nun möchte ich aber das die 1 in das Feld A35 von Tabelle 2 geschrieben wird so...
14.06.2004 16:27:05
Thread-ID: 441147
3 Beiträge
Anzeige
popup mit symbolbildchen
Kersten

Hallo zusammen
Ich möchte gerne einem popup-Button ein Bild zufügen. In den pup-unterbottons geht das. Aber nicht in dem Hauptbutton.
Zum Beispiel:
Set oPopUp = oBar.Controls.Add(Type:=msoControlPopup)
oPopUp.Caption = " Anzeigen "

With oPopUp
.Toolti...
01.10.2004 20:25:05
Thread-ID: 494039
2 Beiträge
Datum bei klick anzeigen
Alfred

Hallo!
Gibt es vielleicht eine Möglichkeit das wenn man z.B. auf A1 eine Zahl eingibt das dann automatisch auf A2 das aktuelle Datum steht?
Wird wahrscheinlich ein =WENN Befehl sein aber ich weiß leider nicht wie man das Datum im Befehl zusammenbringt.
Danke schon mal im Voraus für...
07.06.2005 18:07:40
Thread-ID: 621001
10 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Excel-Bild als Pop-up öffnen: So geht's

Schritt-für-Schritt-Anleitung

Um ein Bild in Excel als Pop-up anzuzeigen, wenn du auf eine bestimmte Zelle klickst, kannst du die folgenden Schritte ausführen:

  1. Bild einfügen:

    • Gehe zu Einfügen > Grafik > Aus Datei und wähle das Bild aus, das du anzeigen möchtest.
    • Benenne das Bild z.B. in "MeinBild" um, indem du auf das Bild klickst und im Namensfeld oben links den neuen Namen eingibst.

  2. VBA-Code einfügen:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
    • Doppelklicke im Projektfenster auf das entsprechende Arbeitsblatt (z.B. "Tabelle1"), in dem du das Bild anzeigen möchtest.
    • Füge den folgenden Code ein:
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Not Intersect(Target, [A1:C1]) Is Nothing Then
       Me.Pictures("MeinBild").Visible = False
       Select Case Target.Address(0, 0)
           Case "A1"
               Me.Pictures("Bild 1").Visible = True
           Case "B1"
               Me.Pictures("Bild 2").Visible = True
           Case "C1"
               Me.Pictures("Bild 3").Visible = True
           Case Else
       End Select
   Else
       Me.Pictures("Bild 1").Visible = False
       Me.Pictures("Bild 2").Visible = False
       Me.Pictures("Bild 3").Visible = False
   End If
End Sub

  3. Schließe den VBA-Editor und gehe zurück zu Excel.

  4. Teste die Funktion:

    • Klicke auf die Zellen A1, B1 oder C1 und beobachte, wie das Bild erscheint oder verschwindet.

Häufige Fehler und Lösungen

  • Bild wird nicht angezeigt: Stelle sicher, dass der Bildname im Code genau mit dem Namen des Bildes in Excel übereinstimmt.
  • VBA-Code funktioniert nicht: Überprüfe, ob der Code im richtigen Arbeitsblatt eingefügt wurde.
  • Bild bleibt sichtbar: Achte darauf, dass die Sichtbarkeit im Code richtig eingestellt ist.

Alternative Methoden

Eine alternative Methode, um ein Bild als Pop-up in Excel anzuzeigen, besteht darin, eine UserForm zu verwenden. Hierbei kannst du die UserForm so gestalten, dass sie das Bild enthält und bei einem Klick auf die Zelle geöffnet wird.

  1. Erstelle eine UserForm im VBA-Editor.
  2. Füge ein Bild-Steuerelement zur UserForm hinzu.

  3. Verwende folgenden Code, um die UserForm zu öffnen:

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Target.Address = "$A$1" Then
       UserForm1.Show
   End If
End Sub

Praktische Beispiele

  • Ein Bild in Zelle A1 anzeigen:

    • Füge das Bild in die Excel-Zelle ein und benenne es "Bild 1". Der oben erwähnte VBA-Code sorgt dafür, dass das Bild erscheint, wenn du in die Zelle A1 klickst.

  • Mehrere Bilder verwalten:

    • Du kannst das Konzept erweitern, indem du weitere Bilder in den Zellen B1 und C1 hinzufügst und den entsprechenden VBA-Code anpasst.

Tipps für Profis

  • Bilder formatieren: Achte darauf, dass die Bilder gut formatiert sind, um ein ansprechendes Erscheinungsbild in deiner Excel-Datei zu gewährleisten.
  • Makros aktivieren: Stelle sicher, dass Makros in deiner Excel-Anwendung aktiviert sind, damit der VBA-Code korrekt ausgeführt werden kann.
  • Verwende die Windows-Taste + R: Um schnell auf den VBA-Editor zuzugreifen, kannst du die Windows-Taste + R drücken und "excel /e" eingeben, um eine neue Excel-Datei zu öffnen.

FAQ: Häufige Fragen

1. Wo kann ich das Bild speichern? Du kannst das Bild direkt in der Excel-Datei einfügen, indem du auf Einfügen > Grafik > Aus Datei gehst.

2. Wie viele Bilder kann ich einfügen? Du kannst beliebig viele Bilder einfügen, achte aber darauf, den VBA-Code entsprechend anzupassen, um die Sichtbarkeit jedes Bildes zu steuern.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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