OptionButton

BERRACHED said

XLDnaute Accro

• 20 Octobre 2008

• #2

Re : OptionButton

Salut,egman

une ébauche si j'ai bien compris

Cordialement

 

Pièces jointes

• Copie de _Options-B.xls

  28.5 KB · Affichages: 62

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 20 Octobre 2008

• #3

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

 

Vote positif 0 Vote négatif

BERRACHED said

XLDnaute Accro

• 20 Octobre 2008

• #4

Re : OptionButton

Salut,Kjin

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

Cordialement

 

Vote positif 0 Vote négatif

E

egman

XLDnaute Occasionnel

• 21 Octobre 2008

• #5

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

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 21 Octobre 2008

• #6

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

Code:

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

A+
kjin

 

Vote positif 0 Vote négatif