Débutant probleme de boucle

[Nico]

Bonjour à tous
Débutant je dois rendre un petit projet pour demain et je bute sur la création d'une boucle...

J'ai fais un Userform qui permet d'écrire quelques données sur une feuille. Le probleme vient de trois 'case à cocher' !
Je souhaiterais que l'utilisateur ne puisse pas valider (bouton) tant qu'une n'est pas cochée.

Auriez vous une idée ? Merci d'avance

 

[Hervé]

bonsoir nico, tata olive, le forum

si tu n'a que 3 checkbox, tu n'a pas besoin de boucle. Essayes ceci au début de ta procédure de validation :

If Not CheckBox1 And Not CheckBox2 And Not CheckBox3 Then
        MsgBox 'Merci de sélectionner au moins un checkbox.'
        Exit Sub
End If

salut

 

[Nico]

J'essaye ca de suite
Merci beaucoup

 

[Nico]

Merci Hervé, ca marche

Je reviens comme même à la charge avec une autre question.
Maintenant que mon Userform marche, j'aimerai pouvoir remettre toute les valeurs à '' pour le prochain cycle.

J'ai réussi pour les zones de texte mais je n'arrive pas à faire de même avec les cases d'options (3 cases). (La case coché au cycle précedent reste par défaut)

 

[nono]

checkbox1.value=false

 

[Nico]

Merci à tous !