creation d'un bouton

Lemak10

XLDnaute Nouveau
Bonjour, à tous


Voilà je doit créer un bouton qui permet d'effacer toutes les cases cocher d'un questionnaire pour revenir à 0 aprés une première utilisation du questionnaire mais je n'arrive pas à le faire. Si quelqu'un peut m'aider ça serait gentil de sa part MERCi.
 

Creepy

XLDnaute Accro
Hello Everybody,

Alors le code suivant fera ca tres bien :

Dim A As Integer
For A = 1 To 6
   
If Userform1.Controls('Checkbox' & A).Value = True Then Userform1.Controls('Checkbox' & A).Value = false
Next


Cependant :

1 - Toutes tes checkbox doivent s'appeller pareil dans l'exemple checkbox1, checkbox2, etc...

2 -en A= tu modifies en fonction des numeros de tes checkboxs

++

Creepy
 

Discussions similaires