OVH Cloud OVH Cloud

OptionButton

3 réponses
Avatar
Starwing
Bonjour,

Dans un Userform j'ai placé un OptionButton.
Lorsque le UserForm se déploie, j'ai plaçé ce code:
OptionButton1.value=True
Tout est OK! Cela fonctionne bien.
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.value=False
Voici le code que j'utilise, mais cela ne fonctionne pas.
If OptionButton1.Value = False Then OptionButton1.Value = True else
OptionButton1.Value=False


Merci d'avance Starwing

3 réponses

Avatar
LeSteph
Bonjour Starwing,
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.valueúlse
...


Il suffit de ne pas mettre de code! car
C'est ce que fait normalement un optionButton lorsqu'on clique dessus
si on met le code suivant cela rebascule

optionbutton1= not optionbutton1

lSteph

"Starwing" a écrit dans le message de news:

Bonjour,

Dans un Userform j'ai placé un OptionButton.
Lorsque le UserForm se déploie, j'ai plaçé ce code:
OptionButton1.value=True
Tout est OK! Cela fonctionne bien.
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.valueúlse
Voici le code que j'utilise, mais cela ne fonctionne pas.
If OptionButton1.Value = False Then OptionButton1.Value = True else
OptionButton1.Valueúlse


Merci d'avance Starwing




Avatar
Starwing
Bonjour LeSteph

Le petit Bonjour de boutton Option refuse catégoriquement de changer lorsque
je clique dessus...
As-tu une idée du pourquoi?

Merci d'avance...

Starwing
"LeSteph" a écrit dans le message de
news:
Bonjour Starwing,
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.valueúlse
...


Il suffit de ne pas mettre de code! car
C'est ce que fait normalement un optionButton lorsqu'on clique dessus
si on met le code suivant cela rebascule

optionbutton1= not optionbutton1

lSteph

"Starwing" a écrit dans le message de news:

Bonjour,

Dans un Userform j'ai placé un OptionButton.
Lorsque le UserForm se déploie, j'ai plaçé ce code:
OptionButton1.value=True
Tout est OK! Cela fonctionne bien.
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.valueúlse
Voici le code que j'utilise, mais cela ne fonctionne pas.
If OptionButton1.Value = False Then OptionButton1.Value = True else
OptionButton1.Valueúlse


Merci d'avance Starwing








Avatar
LeSteph
Re...
oui, c'est normal
il n'y a pas besoin de code
en cliquant dessus il se modifie tout seul
de l'état true à false
mais si tu veux le contrôler depuis un autre objet
tu peux utiliser du code ex

Private sub userform1_click
optionbutton1 = not optionbutton1
end sub

En revanche si tu mets ce code sur optionbutton lui même
il passe de false à true parceque tu clique dessus et son état rebascule
immédiatement de true à false parceque c'est dans ton code...

leSteph




"Starwing" a écrit dans le message de news:
e%
Bonjour LeSteph

Le petit Bonjour de boutton Option refuse catégoriquement de changer
lorsque
je clique dessus...
As-tu une idée du pourquoi?

Merci d'avance...

Starwing
"LeSteph" a écrit dans le message de
news:
Bonjour Starwing,
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.valueúlse
...


Il suffit de ne pas mettre de code! car
C'est ce que fait normalement un optionButton lorsqu'on clique dessus
si on met le code suivant cela rebascule

optionbutton1= not optionbutton1

lSteph

"Starwing" a écrit dans le message de news:

Bonjour,

Dans un Userform j'ai placé un OptionButton.
Lorsque le UserForm se déploie, j'ai plaçé ce code:
OptionButton1.value=True
Tout est OK! Cela fonctionne bien.
Toutefois, lorsque le Userform est déployer, j'aimerais que lorsque je
clique sur cet OptionButton, que l'OptionButton1.valueúlse
Voici le code que j'utilise, mais cela ne fonctionne pas.
If OptionButton1.Value = False Then OptionButton1.Value = True else
OptionButton1.Valueúlse


Merci d'avance Starwing