OVH Cloud OVH Cloud

Checkbox cochés ?

11 réponses
Avatar
Denys
Bonjour,

Dans un Userform j'ai 64 checkbox.... Je voudrais que si aucun des checkbox=
n'est coch=E9 qu'il y ait un message demandant d'en choisir au moins un...

Un peu comme suit mais en mentionnant de 1 =E0 64:

If all Checkbox.Value =3D "" Then
Msg =3D "Veuillez SVP choisir une des raisons"
dialogstyle =3D vbOKOnly + vbCritical
Title =3D "Attention"
reponse =3D MsgBox(Msg, dialogstyle, Title)
Cancel =3D True
Beep
Exit Sub
End If

Merci pour votre temps

Denys

1 réponse

1 2
Avatar
isabelle
oups
demandant d'en choisir au moins un...


toutes mes excuses Jacky, j'avais très mal lu %-(

isabelle

Le 2014-05-07 17:42, Jacky a écrit :
Hello Isabelle

heu.. si un des CheckBox est vrai il vaut mieux ne pas sortir tout de suite de la boucle


Tel que j'ai écrit la procédure on ne sort pas seulement de la boucle, mais de la procédure.

La question était:
Je voudrais que si aucun des checkbox n'est coché qu'il y ait un message demandant d'en choisir au moins
un...




Donc, si on trouve un CheckBox de cocher==> hop!!! on s'en va (boire le thé), et pas de message et inutile de
boucler plus loin.

1 2