Problème Userform et boucle

Question

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.

michel_m · Answer

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

Problème Userform et boucle

1 réponse

Discussions similaires

Newsletters