Bonjour a tous,
Je recherche de l'aide car je ne comprends pas pourquoi mon code ne marche qu'une fois sur 10 voir 20...
Je vous joins mon fichier, cela sera plus simple a comprendre... En fait je souhaite guider la personne en lui indiquant ou elle peut trouver son code. Mon image est un scan en JPG.
Voici mon code qui marche 1 fois par miracle :
Private Sub Image1_Click()
Me.Image1.Picture = LoadPicture("U:macro\photo\code.JPG")
End Sub
J'ai egalement essaye celui-ci, qui me donne le meme resultat, a savoir marche une fois par miracle... :
Private Sub Image1_Click()
Dim Chemin As String
Chemin = "U:macro\photo\code.jpg"
Image1.Picture = LoadPicture(Chemin)
End Sub
Avez vous des solutions a me proposer ou des piste d'explication sur le pourquoi ce code ne marche pas systematiquement?
Egalement, lorsque ce code marche, l'image est evidemment pas du tout dimensionnee et fait apparaitre juste 1/10eme de l'image. Comment puis-je faire pour que cette image apparaisse parfaitement dans mon userform?
Merci d'avance pour votre aide!