Image et userform ?

[Hervé]

bonjour le forum,

J'ai un USF qui affiche les renseignements sur des clients.

Je souhaiterai, en fonction du client selectionné, faire apparaitre sa photo dans l'USF avec ses renseignements.

Comment puis je m'y prendre??

merci
@+
Hervé

 

[G'Claire]

Hervé, le forum

Voici un code que m'avait donné LaurentTbt (Que je remercie, encore).

Private Sub ListBox1_Click()

Dim Photo As String

On Error GoTo Fin 'si erreur aller à fin

Photo = ListBox1.Value
Frame6.Visible = True
Image1.Picture = LoadPicture(ThisWorkbook.Path & "\" & Photo & ".jpg")
Label16.Visible = False
Exit Sub ' ici on sort si pas d'erreur

Fin: 'ici c'est l'image par défaut qui s'affiche en cas d'erreur

Label16.Visible = True
Label16.Caption = "Pas de photo disponible pour cette référence. "
Image1.Picture = LoadPicture()
Err.Clear ' Efface les champs d'erreur

End Sub

Comme je ne sais pas comment tu fait la sélection pour tes clients je te remet le code tel que je l'ai, mais il est facilement adaptable

Si problème donne plus d'infos, G'Claire

 

[mouton]

bonjour,
je connais pas trop le code alors serait il possible de l expliquer afin que je puisse l adapter a mon cas.

Moi je tappe un chiffre dans une cellule et je veux que ca affiche l image(jpg) qui porte le meme numero qui se trouve dans un repertoire /photos



merci

 

[Hervé]

bonsoir le forum

merci G'Claire ... tu m'as en effet eclairé...

@+, Hervé