Valeurs OptionButton

Résolu
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -  
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
j ai jamais utilisé des OptionButton et je ne trouve pas les infos
j'ai 2 OptionButton qui vont ensemble OptionButton1 et OptionButton2 caption matin et apres midi ils sont dans un userform

je voudrais
si je clique sur OptionButton1 récupérer la valeur "1"
si je clique sur OptionButton2 récupérer la valeur "0"
comment dois je m'y prendre ?
merci de votre aide
A voir également:

2 réponses

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

je ne trouve pas les infos

Pourtant elles existent, ici par exemple
1
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
bonjour
cette page je l'ai visité mais ça m'a pas plus avancé en fait
je vais faire des essais
merci
0
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonsoir,

je voudrais
si je clique sur OptionButton1 récupérer la valeur "1"
si je clique sur OptionButton2 récupérer la valeur "0"


Pour obtenir ce que tu veux, ce code suffit :

Dim résultat As Integer
If OptionButton1 Then résultat = 1 Else résultat = 0
0
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
bonsoir
donc avec un seul bouton cliqué =1 non cliqué =0?
on peut faire
textbox1.Value = OptionButton1 ' cliqué textbox1 = 1 ' non cliqué = 0
0
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonsoir,

    If OptionButton1 Then textbox1.Value = 1 Else textbox1.Value = 0

Si op1 est coché ta textbox1 sera à 1 sinon c'est op2 qui est coché et tu as zéro.
0
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
Bonsoir,
Merci de ta patience c'est compris
a bientôt
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

exemple: vrai=-1, faux=0

Private Sub OptionButton1_Click()
Dim x As Integer, xx As Integer
x = OptionButton1.Value
xx = OptionButton2.Value
End Sub

si je clique sur OptionButton2 récupérer la valeur "0" marche pas comme ca, si clique OptionButton2 vous aurez -1 pour cet objet et 0 pour tout les autres
0
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
Bonjour
x et xx on peut remplacer par la valeur que l'on veut ?
ou c'est deja egal a -1 et 0
merci
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

vous prenez les variables que vous voulez, mais il faut les definir en integer pour avoir -1 ou 0
0
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
bonsoir
merci de votre aide c'est clair
a bientôt
0