Discussion :

[Pierre67]

Bonjour

je réalise un userform avec un contrôle "image1" pour insérer une image en fonction du choix dans une listbox avec le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Sub listpanneaux_click()
Dim chemin As String, fichier As String, pathpanneaux As String, nom As String
Image1.Picture = LoadPicture()
chemin = ActiveWorkbook.Path & "\"
pathpanneaux = chemin & "panneaux" & "\" & cheminpanneaux & "\"
nom = Me.listpanneaux.Column(0)
fichier = pathpanneaux & nom & ".jpg"
Me.TextBox1 = fichier
'Me.Image1.Picture = LoadPicture(fichier)
End Sub

en vérifiant le nom du fichier, via le textbox1 le nom et chemin est correct (voir image jointe)
par contre j'obtiens une erreur 76 chemin introuvable !! dans la ligne me.image1.picture
je ne comprends plus rien

où est l'erreur ?

merci pour vos conseils