Boucle pour incrémenter des Checkbox

[gbcof]

Bonjour,

Je voudrais manipuler des Checkbox que j'ai dans un userform. J'en ai une vingtaine et je voudrais faire cela intelligemment c'est à dire avec un i qui irait de 0 à 20 pour vider ou récupérer le contenu de mes checkbox. Le problème c'est que je ne sais pas comment faire et que je ne trouve pas.

Comment passer de Checkbox10 à Checkbox(10). J'ai principalement essayé en faisant une instanciation :
Set CB = "Checkbox" & i ; pour caricaturer mais impossible de m'en sortir.

Quelqu'un sait-il comment faire?

Merci d'avance

 

[roro69]

Re : Boucle pour incrémenter des Checkbox

Bonjour
essaye peut etre ceci
Dim i As Byte
For i = 1 To 20
If Me.Controls('Checkbox' & i) = True Then
...........
End If
Next i
Bonne journée

 

[gbcof]

Re : Boucle pour incrémenter des Checkbox

Merci beaucoup pour ta réponse.

Cela fonctionne très bien en plus j'ai accès aux propriétés de mes Checkbox (Caption, etc.).

Merci encore pour ton aide.