comment deselection un groupe d'optionButton lorsqu'un choix à déjà était fait ?

Question

tout d'abord bonjour,

juste une p'tite question... 
Lors de la cr&#233;ation d'un groupe d'optionButton aucun boutton n'est selectionn&#233; (par d&#233;faut),
si vous click&#233; dessus, il se selectionne et vous permet ainsi de selectionner 1 seule proposition parmis toutes celles propos&#233;es... 

Savez vous comment d&#233;selectionner le choix fait et rendre le groupe d'optionButton comme au demarrage  (aucun controle n'est selectionn&#233;)  
    

merci d'avance pour votre attention...

cordialement,
                                                                     mika

Starec · Answer

Salut

Il faut cr&#233;er une routine

Private sub InitBoutton()
' Mettre tous des boutons avec la propri&#233;t&#233; value &#224; false
me.optbutton1.value = false
me.optbutton2.value = false
-
-
end sub

Et appelle l&#224; quand tu veux en faisant par exmple un commandeButton "Initialisation" et sur l'&#233;v&#232;nement Click &#233;crit : call InitBoutton

Starec

jpleroisse · Answer

C'est une question qui m'int&#233;resse aussi car j'ai essay&#233; toutes sortes de codes et je n'y arrive pas, je viens de copier le code de Starec, m&#234;me chose Message vb (Utilisation incorrecte de la propri&#233;t&#233;). J'esp&#232;re que quelqu'un va trouver (si c'est possible avec des OptionButton ?)

jpleroisse

Starec · Answer

C'est Starec

Je ne comprends pas pourquoi ce code ne fonctionne pas, par contre si tes boutons ont un item, il faut le mettre avant le value.

Starec

youkizouki · Answer

merci c'est cool...

bonne fin de journ&#233;e et bon week end !

jpleroisse · Answer

OK Starec, avec l'Item &#231;a marche je n'y pensais vraiment pas.
Merci

jpleroisse

youkizouki · Answer

bonjour jp,

moi non plus je ne comprend pas pourquoi ca ne va pas chez toi, en ce qui me concerne,
je ne reprend meme pas tout les optionButton un par un : 
Me.optbutton1.value = false
Me.optbutton2.value = false
-

mais comme ce genre de controle fais partie d'une collection (groupe de controle)
je fais directement : 
Dim ctrl as Control
For Each ctrl In OptionButton1
   ctrl.value = false
next
* ctrl prendra en fait le "nom(index)" de chaques optionButton
* la boucle For Each a pour but d'&#233;num&#233;rer tout tes controle (dans leur ordre d'index /!\ ) et donc place la propri&#233;t&#233; value de tout tes OptionButton1 a False.

Le message d'erreur que tu as ne viens t il pas d'un probleme d'index par hasard ????
j'espere t'avoir aider autant que vous ne l'ayez fait pour moi et bonne continuation...
Si tu as besoin n'h&#233;site pas...

cordialement,
                                                   mika

Comment deselection un groupe d'optionButton lorsqu'un choix à déjà était fait ?

6 réponses

Discussions similaires