Condition AND ne fonctionne pas

Bonsoir le forum,

J'utilise 2 optionbutton et un des deux doit être sélectionné pour la suite du code. Malheureusement cela ne fonctionne pas. Où ce trouve le problème dans le code.

Voir le fichier joint.

Merci de votre aide

Bonsoir Linebaker, bonsoir le forum,

Peut-être comme ça :

If OptionButton1 = False And OptionButton2 = False Then

Mais pourquoi ne pas attribuer la valeur True par défaut à un des deux boutons d'option ?

Ou alors placer la condition en tout début, rendant ainsi le choix obligatoire. Du style :

Private Sub CommandButton2_Click()
If OptionButton1 = False And OptionButton2 = False Then
    MsgBox "Vous devez spécifier si c'est pour l'équipe de jour ou de soir ?"
    OptionButton1.SetFocus
    Exit Sub
End If
Worksheets("Feuil2").Activate
'...

Bonsoir ThauThème, le forum,

Effectivement le fait de déplacé le tout est une excellente idée.

Je ne voulais pas mettre true à une des valeurs au cas ou la personne devrait choisir l'équipe de soir.

Merci de ton aide.