Private Sub Command1_Click() Dim Ctl As Control For Each Ctl In Controls If TypeOf Ctl Is CheckBox Then '# Si tu veux ajouter un test sur le nom.... tu peux !! Ctl.Value = vbUnchecked End If Next Ctl End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question