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

2 réponses

  1.
    gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    Bonjour,

    je ne trouve pas les infos

    Pourtant elles existent, ici par exemple
    1
    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
    2. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      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
    3. 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
    4. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      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
    5. 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
  2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    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
    1. 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
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Re,

      vous prenez les variables que vous voulez, mais il faut les definir en integer pour avoir -1 ou 0
      0
    3. 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

Discussions similaires

Message ne s'envoie pas données mobiles Redmi
Eric -
FalkenHarlais -

4 réponses
question pix mot caché
aorum10 -
pixlagalere -

7 réponses