OptionButton

[egman]

Bonjour à tous,

J'aurai besoin de votre aide sur un petit probleme de boutons d'options dans un userform.
Je n'arrive pas à récupérer en meme temps 2 valeurs pour un meme OptionButton.
J'arrive à récupérer la Caption de ce bouton en Feuil1 mais je n'arrive pas à associer la croix correspondante à mon choix en Feuil2.
Ci-joint un petit exemple.

Merci de votre aide

 

[BERRACHED said]

Re : OptionButton

Salut,egman

une ébauche si j'ai bien compris

Cordialement

 

[kjin]

Re : OptionButton

Bonsoir,
Bin, tu es plus perspicace que moi Said , tu as du trouver le formulaire, parce que moi je dois être miro 😀
A+
kjin

 

[BERRACHED said]

Re : OptionButton

Salut,Kjin

il n'y avait pas de formulaire tu as vu juste ! je l'ai fait

Cordialement

 

[egman]

Re : OptionButton

Salut Said,

Merci pour ta réponse rapide mais c'est pas aussi simple que çà....
En fait lorsque tu te sers du bouton d'option tu renvoies bien la Caption de celui ci sur la feuille1 en A4 mais tu renvoies également la meme Caption sur la feuille2....
Ce que je recherche à faire c'est effectivement renvoyer la Caption sur la feuille1 mais sur la feuille 2 renvoyer une valeur comme "X"....tu vois ou je veux en venir....?

D'avance merci

 

[kjin]

Re : OptionButton

Bonjour,
Je n'ai pas le courage de créer un formulaire...
Tu ne précises pas s'il faut effacer les valeurs existantes...
Donc, avec le formulaire de said que je salue, et uniquement l'OptionButton1

Private Sub CommandButton1_Click()
Sheets("Feuil1").Range("A3") = IIf(OptionButton1, OptionButton1.Caption, "")
Sheets("Feuil2").Range("B4") = IIf(OptionButton1, "X", "")
End Sub

A+
kjin