Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1592to1596
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

bild anzeigen in User Form

bild anzeigen in User Form
03.12.2017 16:28:05
Claudius
Hallo,
Ich habe eine Exceltabelle. in Spalte A ist die laufende Nummer, in Spalte I der Verweis auf ein Bild mit dem kopletten Dateipfad und Bildname.
Dazu passend gibt es eine User-Form. Im Bildfeld Image1 soll nun nach Auswahl der laufenden Nummer in der Listbox 1 das dazu passende Bild angezeigt werden.
Kann mir dazu jemand mit dem Code helfen?
Vielen Dank!

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: bild anzeigen in User Form
03.12.2017 16:54:33
Sepp
Hallo Claudius,
das geht so (nach deinen Angaben).
Private Sub ListBox1_Change()
Dim varRet As Variant, strFile As String

If ListBox1.ListIndex > -1 Then
  With Sheets("Tabelle1") 'Tabellennme anpassen!
    varRet = Application.Match(Clng(ListBox1.Text), .Columns(1), 0)
    If Not IsError(varRet) Then
      strFile = .Cells(varRet, 9).Value
      If Dir(strFile, vbNormal) <> "" Then
        Image1.Picture = LoadPicture(strFile)
      Else
        Image1.Picture = LoadPicture("")
      End If
    End If
  End With
End If
End Sub

Gruß Sepp

Anzeige
AW: bild anzeigen in User Form
03.12.2017 17:26:30
Claudius
Hallo, Sepp!
Super, funktioniert, vielen Dank!
Grüße
Claudius

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige