Problème Userform et boucle

Marco_paulo Messages postés 5 Statut Membre -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je fais un projet sous vba et j'ai le problème suivant:

J'ai plusieurs checkbox (checkbox1,checkbox2,...) et je voudrait savoir si elles sont cochées ou non grâce à une boucle.
J'écris donc

Sub Macro1()
For i = 1 To 100
If UserForm1.["checkbox" & i].Value = False Then
...
End If
Next
End Sub

Le problème c'est que quand je met Checkbox & i, Excel ne comprend pas que je veux dire Checkbox1, Checkbox2.

Je ne vois vraiment pas comment faire.

1 réponse

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour

essaies dans ton Usf

Dim Cbx As Control

For Each Cbx In Me.Controls
     If TypeOf Cbx Is MSForms.CheckBox And Cbx Then somme = somme + 1
Next Cbx
MsgBox somme

0