Discussion :

[Korigoth]

Salut

j'ai 12 Option Box différente pour les différents département.
m& question est :

Comment est-ce que je peux faire une boucle qui Decoche tout les Optionbox de la form lors de la fermeture de la form et lorsque la personne appuie sur OK ou Retour


en se moment je marche avec

OP_secteur52.value = false mais la dans ma form complete jai 15 OP donc sa ne fait pas jolie du tout....

est-ce que c'est possible de faire une boucle qui decoche tout les options box?

merci d'avance

P.S. jai regarder pas mal pour la 2ieme question mais je ne trouve rien pour les UserForms

[SfJ5Rpw8]

Bonjour,

s'il s'agit bien de bouton d'option dans la même zone, tu ne peu en avoir qu'un seul coché à la fois...

et tu peu jouer avec cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
OptionButton1 = True ' Seul le bouton option 1 est mis à 1 ...
DoEvents
 OptionButton1 = False ' Mise à 0 du seul bouton à 1...

sinon il s'agit de revoir les noms de tes options boutons de façon à pouvoir déterminer ce nom à partir d'une boucle :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 Dim i As Integer
 For i = 1 To 2
   Me.Controls("OptionButton" & i).Value = False
 Next

troisième solution tu boucle sur tous les contrôles de ton userform et tu teste leur type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 Dim oC As Control
  For Each oC In Me.Controls
    If TypeName(oC) = "OptionButton" Then
        oC.Value = False
    End If
  Next