Aligner d'une boucle

Bonjour,

je souhaiterais manipuler un grand nombre de CheckBox autant au niveau de leurs positions (Left) que de leur intitulés (Caption) sur une Userform à l'aide d'une boucle dans ce genre:

Private Sub CommandButton1_Click()

For a = 1 To 10

"Checkbox" & a & ".left"= 10

"Checkbox" & a & ".Caption" = "xxx"

Next

End Sub

Bien sur ça ne fonctionne pas ...

Pouvez vous m'aider ?

Merci !

Bonjour

A placer dans le code de l'userform

Private Sub CommandButton1_Click()
  For a = 1 To 10
    Me.Controls("Checkbox" & a).Left = 10
    Me.Controls("Checkbox" & a).Caption = "xxx"
  Next
End Sub
Banzai64 a écrit :

Bonjour

A placer dans le code de l'userform

Private Sub CommandButton1_Click()
  For a = 1 To 10
    Me.Controls("Checkbox" & a).Left = 10
    Me.Controls("Checkbox" & a).Caption = "xxx"
  Next
End Sub

Merci, je ne pensais pas du tout à "ME.Controls" que je ne comprends pas vraiment en fait...

Mais ça marche, c'est l'essentiel !

Maintenant que j'arrive à positionner et renseigner mes CheckBox comme je le désire, j'ai un autre problème, c'est que j'aimerais lancer une Sub lorsque l'un d'eux est modifié afin de les lire tous et modifier une variable en fonction...

Y a t il moyen de les grouper et d'appeler cette Sub lorsque le "groupe" est modifié (Si oui, je ne sais pas faire) ?

Merci !!

Rechercher des sujets similaires à "aligner boucle"