OVH Cloud OVH Cloud

Option button coché ? pas coché ?

4 réponses
Avatar
SHiSo
Bonjour,

je souhaiterai tester le "cochage" d'un bouton option
(Formulaire) mais ceci ne marche pas

If DialogSheets("Projet").Shapes("Option Button 28") = True
Then
MsgBox "Goodiso"
End If

Si qq1 a une soluce :)

Thx
SHiSo

4 réponses

Avatar
AV
je souhaiterai tester le "cochage" d'un bouton option
(Formulaire) mais ceci ne marche pas


Une ligne :
If DialogSheets("Projet").OptionButtons(1).Value = xlOn Then MsgBox "Goodiso"

AV

Avatar
SHiSo
thx :))

En fait, ce test s'applique sur un bouton OK d'une boite de
dialogue; ce bouton teste si les champs on bien été rempli
sinon il affiche un msgbox et doit revenir à la fenetre.
COmment lui dire de revenir à la boite de dialogue
lorsqu'un ou plusieurs champs n'ont pas été remplie ?
Avatar
AV
En fait, ce test s'applique sur un bouton OK d'une boite de
dialogue; ce bouton teste si les champs on bien été rempli
sinon il affiche un msgbox et doit revenir à la fenetre.
COmment lui dire de revenir à la boite de dialogue
lorsqu'un ou plusieurs champs n'ont pas été remplie ?


Tu parles de boutonoption puis de champs....
C'est quoi un "champ" ?

AV

Avatar
En fait, j'ai une boite de dialogue avec un bouton OK et
des champs Edit Box.
Lorsque je clic sur le bouton OK, il vérifie si tout a bien
été remplis, sinon il affiche un MsgBox "il manque
blablalb" et revient sur la boite de dialogue