Valeurs OptionButton

Résolu/Fermé
surplus Messages postés 673 Date d'inscription mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 - 4 avril 2014 à 00:09
surplus Messages postés 673 Date d'inscription mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 - 4 avril 2014 à 23:32
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 lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 714
4 avril 2014 à 08:57
Bonjour,

je ne trouve pas les infos

Pourtant elles existent, ici par exemple
1
surplus Messages postés 673 Date d'inscription mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 4
4 avril 2014 à 20:28
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 lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 714
4 avril 2014 à 21:12
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 mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 4
Modifié par surplus le 4/04/2014 à 21:47
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 lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 714
4 avril 2014 à 22:53
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 mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 4
4 avril 2014 à 23:31
Bonsoir,
Merci de ta patience c'est compris
a bientôt
0
f894009 Messages postés 17233 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 janvier 2025 1 712
4 avril 2014 à 07:47
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 mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 4
4 avril 2014 à 13:45
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 17233 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 janvier 2025 1 712
4 avril 2014 à 15:39
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 mardi 17 août 2010 Statut Membre Dernière intervention 14 novembre 2021 4
4 avril 2014 à 23:32
bonsoir
merci de votre aide c'est clair
a bientôt
0