Bonsoir à tous,
Je suis à la recherche d'un code qui me permettrait lorsque ma "CheckBox1" = vrai que mon image "Diabète.jpg" s'affiche dans mon "Image3".
Pourriez-vous m'aider à faire ce code? Pour l'instant j'ai trouvé ce qui suit mais j'ai un message d'erreur:
Le "i" est surligné avec le message:
Erreur de compilation: Variable non définie.
Merci par avance.
Je suis à la recherche d'un code qui me permettrait lorsque ma "CheckBox1" = vrai que mon image "Diabète.jpg" s'affiche dans mon "Image3".
Pourriez-vous m'aider à faire ce code? Pour l'instant j'ai trouvé ce qui suit mais j'ai un message d'erreur:
Le "i" est surligné avec le message:
Erreur de compilation: Variable non définie.
Code:
Private Sub CheckBox1_Click()
Image1.Visible = CheckBox1.Value
For i = 1 To 2000
DoEvents
Next
End Sub
Code:
Private Sub Image3_BeforeDragOver(ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As MSForms.DataObject, ByVal X As Single, ByVal Y As Single, ByVal DragState As MSForms.fmDragState, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer)
lblImage.Picture = LoadPicture(CheminImage & Diabète.jpg)
End Sub
Merci par avance.