Bonjour,

Mon problème est pourtant simple, j'aimerais générer un message d'erreur si aucune case d'option est cochée...

Mon code est le suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
                            If Appli.Criticites.K1 = False & Appli.Criticites.K2 = False & Appli.Criticites.K2K3 = False Then 'Regarde si une criticité a bien été cochée
                                MsgBox "Vous devez choisir une Criticité !"
                                Unload Appli
                                Exit Sub
                                Else
                            End If
Cela me génère bien le message, mais cela me le génère même si je coche une case !

Quelqu'un pourrait m'aider svp ?

Merci d'avance !