Bild anzeigen

Forumthread: Bild anzeigen
6 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Bild anzeigen

Bild anzeigen

Rüdiger

Hallo Forum,
ich suche schon seit Tagen nach einer Lösung - und hoffe, hier Hilfe zu finden.
ich habe eine Tabelle mit meinen verkauften Artikeln (Unikate).
Ich möchte bei Doppelklick auf die Artikelbezeichnung, das dazugehörende Foto anzeigen (neues Fenster oder MSGBox wenn möglich).
Die Fotos befinden sich in einem extra Verzeichnis
und haben den gleichen Namen wie die Artikelbezeichnung und zusätzlich .jpg
Bin dankbar für jeden Tipp
Rüdiger

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Bilder in UserForm - Siehe alten Spotlight-Beitrag

NoNet
AW: Bild anzeigen

ChrisL
AW: Bild anzeigen

ChrisL
AW: Bild anzeigen

Rüdiger
AW: Bild anzeigen

Rüdiger
AW: Bild anzeigen

Rüdiger

Bilder in UserForm - Siehe alten Spotlight-Beitrag

07.08.2012 15:37:26

NoNet

Hallo Rüdiger,
schau Dir dazu mal diesen alten Beitrag aus dem ehemaligen Spotlight-Forum an :
http://www.spotlight-wissen.de/archiv/message/1110020.html
Und hier der aktuelle Download-Link dazu :
http://www.excelei.de/downloads/mappen/Produktanzeige_in_UserForm.xls
Salut, NoNet

AW: Bild anzeigen

07.08.2012 15:45:39

ChrisL

Hi Rüdiger
In Ergänzung noch eine "quick & dirty" Variante :)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveWorkbook.FollowHyperlink ThisWorkbook.Path & "\" & Target & ".jpg"
End Sub

Alt+F11, links Doppelklick auf Tabelle, Code einfügen.
cu
Chris

AW: Bild anzeigen

08.08.2012 12:58:39

ChrisL

Hi Rüdiger
ungetestet...

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim strPfad as String
strPfad = ThisWorkbook.Path & "\" & Target & ".jpg"
If Dir(strPfad) = "" Then
MsgBox "gibts nicht"
Else
ActiveWorkbook.FollowHyperlink strPfad
End If
End Sub

cu
Chris

AW: Bild anzeigen

07.08.2012 15:45:45

Rüdiger

Danke NoNet,
ich werde es gleich ausprobieren
Rüdiger

AW: Bild anzeigen

08.08.2012 02:06:30

Rüdiger

Hallo NoNet, hallo ChrisL,
die kurze Version habe ich hinbekommen - die längere Version habe ich nicht so ganz geschnallt, obwohl eleganter -
eine Frage hätte ich noch zu der kurzen Version - könnte man, wenn kein Bild zu einem Artikel vorhanden, statt der Fehlermeldung - einblenden "kein Bild vorhanden" ?
Vielen Dank euch beiden
Rüdiger

AW: Bild anzeigen

08.08.2012 18:52:59

Rüdiger

Hi Chris,
danke, so hatte ich es mir gedacht :-)
Rüdiger