Bild mit Pfad aus Zelle verknüpfen

Forumthread: Bild mit Pfad aus Zelle verknüpfen

06.09.2017 15:59:09

Jan

Hallo liebe Excel Freunde,
nachdem ich nach zwei Tagen keine Lösung für mein Problem finden konnte, melde ich mich nun auf Empfehlung von guten Freunden in diesem Forum.
Problemstellung
Ich möchte mir in Zelle A1 ein Bild anzeigen lassen über einen Link. (Grafik einfügen - mit Datei verknüpfen)
Dies hat auch soweit geklappt. Nun möchte ich in Zelle B1 mir den dazugehörigen Pfad des Bildes aus Zelle A1 anzeigen lassen.
Nun soll der eingefügte Pfad bzw. Hyperlink geändert werden und somit auch das Bild in Zelle A1.
Quasi soll in Zelle A1 das Bild angezeigt werden welches sich auf den Pfad in Zelle B1 bezieht.
Das heißt wenn ich den Pfad in Zelle B1 ändere soll sich das Bild in Zelle A1 mit ändern.
Vielen Dank schonmal im vorraus, hoffe die Problemstellung ist soweit klar. :)
Hoffe Ihr könnt mir helfen.

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Bild mit Pfad aus Zelle verknüpfen

06.09.2017 16:27:34

Nepumuk

Hallo Jan,
Rechtsklick auf den Tabellenreiter - Code anzeigen. In das sich öffnende Codefenster kopierst du folgendes Makro:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$B$1" Then
        If Dir$(Target.Value) <> vbNullString Then
            Call Shapes.AddPicture(Filename:=Target.Value, _
                LinkToFile:=msoTrue, SaveWithDocument:=msoFalse, _
                Left:=Cells(1, 1).Left, Top:=Cells(1, 1).Top, Width:=-1, Height:=-1)
        Else
            Call MsgBox("Kein Bild gefunden", vbExclamation, "Hinweis")
        End If
    End If
End Sub

Dann mit der Tastenkombination Alt+q den Editor schließen und testen.
Gruß
Nepumuk

AW: Bild mit Pfad aus Zelle verknüpfen

07.09.2017 15:13:30

Jan

Das hat geklappt !!
Vielen Dank für die schnelle und Kompetente Hilfe!
Ihr seid super :)

AW: dazu kannst Du HYPERLINK() nutzen ...

06.09.2017 16:36:28

...

Hallo Jan,
... in B1 Deinen kompletten Pfadnamen und dann in A1: dann =HYPERLINK(B1&"\Bild_1.jpg";"Bild_1")

Wenn Du Deinen Bildnamen nicht direkt in die Formel schreiben willst, und diesen in einer weiteren Zelle z.B. in C1 zu stehen hast, dann so: =HYPERLINK(B$1&"\"&C1&".jpg";C1)
Nun könntest Du in C2:C### auch weitere Bildnamen einschreiben und brauchst die Formel A1 nur nach unten kopieren und kannst so alle Bilder aus C über den jeweiligen Link in Spalte A anschauen.
Gruß Werner
.. , - ...

AW: dazu kannst Du HYPERLINK() nutzen ...

07.09.2017 09:02:52

Jan

Danke für die schnelle Hilfe.
Das was du geschrieben hast funktioniert auch einwandfrei allerdings möchte ich das Bild als Grafik in Zelle A1 sehen also eingebettet in die Zelle.
Sorry wenn ich das nicht klar ausgedrückt habe.
Vielen Dank schonmal

AW: das ist mE nur mit VBA realisierbar ...

07.09.2017 14:15:52

...

Hallo Jan,
... hast Du denn den Vorschlag von Nepumuk getestet? Die Bildgrößen mollten dann allerdings in etwas die gleiche Größe haben.
Gruß Werner
.. , - ...

Infobox / Tutorial

Bild mit Pfad aus Zelle verknüpfen in Excel

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Vorbereitung: Stelle sicher, dass du den vollständigen Dateipfad des Bildes in Zelle B1 eingetragen hast. Das könnte etwa so aussehen: C:\Bilder\Bild_1.jpg.
Einfügen des Bildes: Klicke auf Zelle A1, wo das Bild angezeigt werden soll. Gehe dann zu Einfügen > Bilder > Dieses Gerät... und wähle das Bild aus, das du verknüpfen möchtest. Achte darauf, dass du die Option "Mit Datei verknüpfen" auswählst.

VBA-Makro hinzufügen: Drücke ALT + F11, um den VBA-Editor zu öffnen. Füge das folgende Makro in das Codefenster des Arbeitsblatts ein, in dem du das Bild verknüpfen möchtest:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$B$1" Then
        If Dir$(Target.Value) <> vbNullString Then
            Call Shapes.AddPicture(Filename:=Target.Value, _
            LinkToFile:=msoTrue, SaveWithDocument:=msoFalse, _
            Left:=Cells(1, 1).Left, Top:=Cells(1, 1).Top, Width:=-1, Height:=-1)
        Else
            Call MsgBox("Kein Bild gefunden", vbExclamation, "Hinweis")
        End If
    End If
End Sub

Editor schließen: Mit der Tastenkombination ALT + Q schließt du den VBA-Editor.
Testen: Ändere den Dateipfad in Zelle B1 zu einem anderen Bild und teste, ob das Bild in Zelle A1 entsprechend aktualisiert wird.

Häufige Fehler und Lösungen

Bild wird nicht angezeigt: Stelle sicher, dass der Pfad in Zelle B1 korrekt eingegeben ist und dass das Bild existiert. Überprüfe die Dateiendung.
Makro funktioniert nicht: Überprüfe, ob das Makro im richtigen Arbeitsblatt eingefügt wurde. Es muss im Code des Arbeitsblatts stehen, in dem du arbeitest.

Alternative Methoden

Eine andere Möglichkeit, ein Bild in Excel zu verlinken, ist die Verwendung der HYPERLINK-Funktion:

In Zelle A1 kannst du die folgende Formel einfügen:
```
=HYPERLINK(B1 & "\Bild_1.jpg", "Bild_1")
```
Wenn du die Bildnamen in einer zusätzlichen Zelle (z.B. C1) hast, kannst du die Formel so anpassen:
```
=HYPERLINK(B$1 & "\" & C1 & ".jpg", C1)
```

Diese Methode zeigt jedoch nur einen Link an und nicht das Bild selbst.

Praktische Beispiele

Beispiel 1: Du hast den Dateipfad in Zelle B1 als C:\Bilder\Urlaub\ und in Zelle C1 den Bildnamen als Bild1.jpg. In Zelle A1 würde die Formel so aussehen:
```
=HYPERLINK(B1 & C1, "Urlaubsbild")
```
Beispiel 2: Um mehrere Bilder zu verwalten, kannst du die HYPERLINK-Formel in A1 bis A10 kopieren, wobei die Bildnamen in C2:C10 stehen.

Tipps für Profis

Achte darauf, dass alle Bilder ähnliche Abmessungen haben, um die Darstellung zu optimieren, wenn du sie in einer Zelle verknüpfst.
Wenn du viele Bilder verwaltest, könnte es hilfreich sein, ein kleines VBA-Tool zu entwickeln, das dir die Verwaltung der Bilder erleichtert.
Nutze die Formel-Bar, um dynamisch Bildnamen zu generieren, wenn du mit vielen Bildern arbeitest.

FAQ: Häufige Fragen

1. Wie kann ich ein Bild aus dem Internet in Excel verlinken?
Verwende die HYPERLINK-Funktion mit der URL des Bildes, zum Beispiel:

=HYPERLINK("https://example.com/bild.jpg", "Bild anzeigen")

2. Kann ich ein Bild direkt in eine Zelle einfügen?
Ja, du kannst ein Bild in eine Zelle einfügen, indem du das Bild auswählst und dann die Größe anpasst, sodass es in die Zelle passt. Es wird jedoch nicht direkt "eingebettet", sondern bleibt ein Objekt.

Beliebteste Forumthreads (12 Monate)

Bild mit Pfad aus Zelle verknüpfen

Forumthread: Bild mit Pfad aus Zelle verknüpfen

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Bild mit Pfad aus Zelle verknüpfen in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

Bild mit Pfad aus Zelle verknüpfen

Forumthread: Bild mit Pfad aus Zelle verknüpfen

5 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Bild mit Pfad aus Zelle verknüpfen in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread