ich möchte mir, nachdem mir in einer Listform Artikel angezeigt werden nach Klick auf den Artikelnamen in der Userform das Bild anzeigen lassen.
Hier mein Code
Private Sub ListBox1_Click()
Dim nummer1 as String
ListBox1.TextColumn = 2
nummer = ListBox1.text
nummer1 = Right(nummer, 4)
UserForm3.Image1.Picture = LoadPicture(Filename:="F:\Eigene Dateien\Eigene Bilder\temp\CIMG" & nummer1 & ".jpg")
Cancel = True
End Sub
oben extrahiere ich aus dem Artikelnamen die Bildnummer "nummer"
wenn ich die Zeile Userform3.Image1. .... durch
UserForm3.Image1.Picture = LoadPicture(Filename:="F:\Eigene Dateien\Eigene Bilder\temp\CIMG1152.jpg")
ersetzte
dann wird mir ein Bild angezeigt allerdings immer das gleich und das will ich nicht.
Setze ich den Pfad wie oben gezeigt zusammen bekomme ich eíne Fehlermeldung.
bitte helft mir.
mfg
Michael