OVH Cloud OVH Cloud

Vérifier/imposer le click d'un optionbutton

4 réponses
Avatar
ManBas
Bonjour les amis du forum,
SVP, comment dois-je faire pour alerter sur le non-click des optionbuttons
lors de la sortie d'un userform?
Merci de votre aide.

4 réponses

Avatar
anonymousA
bonjour,

qu'est ce que tu appelles le non -click.
un optionbutton a une propriété value dont tu peux tester la nature en
faisant un test sur .valuúlse ou true ce qui te permet de savoir si
oui ou non ils ont été cliqués. Est-ce ca ta demande ?

A+

Bonjour les amis du forum,
SVP, comment dois-je faire pour alerter sur le non-click des optionbuttons
lors de la sortie d'un userform?
Merci de votre aide.




Avatar
ManBas
Bonjour Anonymous
...Oui et non.
Mon idée est la suivante: lors de la sortie du formulaire, si les value sont
false ou 0, un message annoncerait la vacuité de ces items et la macro
empêcherait la fermeture du formulaire. Mais je ne sais pas gérer
l'évènement "sortie"?? (est-ce le terme?).

"anonymousA" a écrit dans le message de news:
427a392d$0$1230$
bonjour,

qu'est ce que tu appelles le non -click.
un optionbutton a une propriété value dont tu peux tester la nature en
faisant un test sur .valuúlse ou true ce qui te permet de savoir si oui
ou non ils ont été cliqués. Est-ce ca ta demande ?

A+

Bonjour les amis du forum,
SVP, comment dois-je faire pour alerter sur le non-click des
optionbuttons lors de la sortie d'un userform?
Merci de votre aide.




Avatar
anonymousA
re,

2 manières de fermer un UF si tu as conservé bien sur la croix de
fermeture du UF (car je suppose que tu sais qu'on peut invalider cell-ci
par une API) .

1-via un commandbutton que l'utilisateur doit cliquer pour valider les
entrées du UF. C'est dans la macro Commanbutton_Click qu'il faut gérer
le test des optionbutton et empêcher la fermeture du UF tout simplement
en sautant la ligne .hide ou unload userform1 selon le cas que tu auras
écrit dans cette procédure.
2-en cliquant sur la croix de fermeture. Dans ce cas, il faut que tu
passe par la procédure evenementielle QueryClose du UF. Je te joins
ci-dessous une copie de l'aide de VBA pour te permettre de comprendre
comment ca marche.C'est dans cette proc evenementielle qu'il te faudra
intégrer ton test sur les optionbutton.

Extrait de l'aide de VBA:

Le code suivant force l'utilisateur à cliquer sur la zone client de
UserForm pour la refermer. Si l'utilisateur tente d'utiliser la boîte
Fermeture de la barre de titre, le paramètre Cancel prend une valeur
différente de zéro, empêchant ainsi l'arrêt. Cependant, si l'utilisateur
a cliqué sur la zone client, CloseMode prend la valeur 1 et l'événement
Unload Me s'accomplit.

Private Sub UserForm_Activate()
UserForm1.Caption = "Cliquez sur moi pour me supprimer!"
End Sub

Private Sub UserForm_Click()
Unload Me
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
' Empêche l'utilisateur de fermer avec le bouton
' Fermer de la barre de titre.
If CloseMode <> 1 Then Cancel = 1
UserForm1.Caption = "Le bouton Fermer ne " & _
"fonctionne pas! Cliquez sur moi!"
End Sub

Bon courage

A+

Bonjour Anonymous
...Oui et non.
Mon idée est la suivante: lors de la sortie du formulaire, si les value sont
false ou 0, un message annoncerait la vacuité de ces items et la macro
empêcherait la fermeture du formulaire. Mais je ne sais pas gérer
l'évènement "sortie"?? (est-ce le terme?).

"anonymousA" a écrit dans le message de news:
427a392d$0$1230$

bonjour,

qu'est ce que tu appelles le non -click.
un optionbutton a une propriété value dont tu peux tester la nature en
faisant un test sur .valuúlse ou true ce qui te permet de savoir si oui
ou non ils ont été cliqués. Est-ce ca ta demande ?

A+


Bonjour les amis du forum,
SVP, comment dois-je faire pour alerter sur le non-click des
optionbuttons lors de la sortie d'un userform?
Merci de votre aide.









Avatar
ManBas
J'utilise un userform sans la croix comme userform "plateforme" à partir
duquel s'ouvre d'autres userforms avec croix.
Je vais utiliser QueryClose car j'ai choisi de conserver la croix sur ce
userform (pour des raisons d'homogeneité avec les autres userform).
C'est trés exactement ce que je voulais (comme toujours!).
Merci +++ anonymous!
A bientôt.

"anonymousA" a écrit dans le message de news:
427a4007$0$1230$
re,

2 manières de fermer un UF si tu as conservé bien sur la croix de
fermeture du UF (car je suppose que tu sais qu'on peut invalider cell-ci
par une API) .

1-via un commandbutton que l'utilisateur doit cliquer pour valider les
entrées du UF. C'est dans la macro Commanbutton_Click qu'il faut gérer le
test des optionbutton et empêcher la fermeture du UF tout simplement en
sautant la ligne .hide ou unload userform1 selon le cas que tu auras écrit
dans cette procédure.
2-en cliquant sur la croix de fermeture. Dans ce cas, il faut que tu passe
par la procédure evenementielle QueryClose du UF. Je te joins ci-dessous
une copie de l'aide de VBA pour te permettre de comprendre comment ca
marche.C'est dans cette proc evenementielle qu'il te faudra intégrer ton
test sur les optionbutton.

Extrait de l'aide de VBA:

Le code suivant force l'utilisateur à cliquer sur la zone client de
UserForm pour la refermer. Si l'utilisateur tente d'utiliser la boîte
Fermeture de la barre de titre, le paramètre Cancel prend une valeur
différente de zéro, empêchant ainsi l'arrêt. Cependant, si l'utilisateur a
cliqué sur la zone client, CloseMode prend la valeur 1 et l'événement
Unload Me s'accomplit.

Private Sub UserForm_Activate()
UserForm1.Caption = "Cliquez sur moi pour me supprimer!"
End Sub

Private Sub UserForm_Click()
Unload Me
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
' Empêche l'utilisateur de fermer avec le bouton
' Fermer de la barre de titre.
If CloseMode <> 1 Then Cancel = 1
UserForm1.Caption = "Le bouton Fermer ne " & _
"fonctionne pas! Cliquez sur moi!"
End Sub

Bon courage

A+

Bonjour Anonymous
...Oui et non.
Mon idée est la suivante: lors de la sortie du formulaire, si les value
sont false ou 0, un message annoncerait la vacuité de ces items et la
macro empêcherait la fermeture du formulaire. Mais je ne sais pas gérer
l'évènement "sortie"?? (est-ce le terme?).

"anonymousA" a écrit dans le message de news:
427a392d$0$1230$

bonjour,

qu'est ce que tu appelles le non -click.
un optionbutton a une propriété value dont tu peux tester la nature en
faisant un test sur .valuúlse ou true ce qui te permet de savoir si oui
ou non ils ont été cliqués. Est-ce ca ta demande ?

A+


Bonjour les amis du forum,
SVP, comment dois-je faire pour alerter sur le non-click des
optionbuttons lors de la sortie d'un userform?
Merci de votre aide.