Userform + image

[Ozons123]

Bonjour le forum,

je me suis baladé sur le forum pour trouver des astuces sur le problème qui m'amène mais malgré les exemples je n'arrive pas à le résoudre.

En fait je souhaite faire apparaître une image TOTO 01.gif si le bouton d'option 1 est "True", et une image TOTO 02 si le bouton d'option 2 est sur "True". Les images sont stokées dans le dossier c:\TOTO\IMAGES

J'ai donc rentré comme code:

If OptionButton1.Value = True Then
Fichier1 = ActiveWorkbook.Path & "c:\TOTO\IMAGES\TOTO 01.gif"
Me.Image1.Picture = LoadPicture(Fichier1)
Else
If OptionButton2.Value = True Then
Fichier2 = ActiveWorkbook.Path & "c:\TOTO\IMAGES\TOTO 02.gif"
Me.Image1.Picture = LoadPicture(Fichier2)
End If
End If

Par avance merci pour votre aide, car le code ne génère pas d'erreur.

Bonne journée

Ludovic

 

[Ozons123]

Re : Userform + image

Merci José pour ta réponse.

Tout fonctionne.

@+ Ludovic