Ok tu veux traiter par programmation
Commence par cr�er 3 boutons radio avec la zone groupe (et non pas le bouton radio), cela te lance un auto pilote, d�fini dedans 3 nom de label, la bascule des bouton se fait automatiquement
Ensuite 2 cas de figure
1 - tu veux lancer une macro lorsque tu cliques sur un choix dans cas assigne cette macro � Chaque bouton radio
Pour s�lectionner un bouton radio dans la zone de groupe apuie d'abors sur Ctrl
Sub ChoixActionnee(Evenement as object)
oControl=Evenement.source 'defini le controle qui appelle la macro
print oControl.model.label, oControl.model.tag
End Sub
2 - tu veux conna�tre quel choix est s�lectionn�: affecte cette macro � un bouton simple
Sub OptionSelect
dim choix as object
MonDocument = ThisComponent 'S�lectionne le document en cours
MaFeuille = MonDocument.CurrentController.ActiveSheet ' s�lectionne la feuille activ�e
DrawPage = MaFeuille.DrawPage 's�lectionne la page des contr�les formulaire
Form = DrawPage.Forms.GetByIndex(0)
'Control = MaForm.getByName("FM1")
Form.getGroupByName("RadioGroup1", Choix())
for x = 0 to UBound(Choix()) With Choix(x) ' .tag est le compl�ment d'information if .State = 1 then print .Label, x+1, .Tag End With next End Sub
[EMAIL PROTECTED] a �crit :
bonjour,
si je comprends bien : je cr�e mes 3 boutons avec le m�me nom pour qu'ils soient "li�es", ensuite, par le code, je r�cup�re le "num�ro" du bouton activ� gr�ce � .state par exemple... si c'est bien �a, �a ne marche pas avec ma version 1.1.4 car si le premier bouton est activ� alors monBouton.state a la valeur 1 (normal jusque l�) mais si je s�lectionne un des deux autres boutons, la valeur est 0.
moi ce que je voudrais faire c'est quelque chose du genre :
if monBoutonRadio.state = 1 then 'faire quelque chose elseif monBoutonRadio.state = 2 then 'faire autre chose else monBoutonRadio.state = 3 'faire encore autre chose end if
mais � la base, ma premi�re id�e �tait de faire avec une cellule li�e :
if maCelluleLiee.value = 1 then ' faire quelque chose elseif maCelluleLiee.value = 2 then ..... etc
voil�, j'esp�re que c'est plus clair. sinon, j'ai li�e chaque bouton � une celulle diff�rente et �a marche tr�s bien. j'aurais juste souhait� passer par une seule cellule ou par aucune comme vous l'avez fait remarquer...
Merci pour votre int�r�t,
William Gotti
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
