Bonjour,

Je souhaite faire en sorte qu'en cliquant sur une checkbox dans mon formulaire, un test vérifie que certains champs textes ont été renseignés et que si tel n'est pas le cas, un message apparaisse tandis que la checkbox se "bloque", c'est à dire qu'elle reste à 0.

Le test fonctionne bien mais j'ai une erreur lorsque j'utilise le code suivant pour maintenir l'état de la checkbox à 0.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Private Sub check_1_1_BeforeUpdate(Cancel As Integer)
    If Nz(champ1) = "" Or Nz(champ2) = "" Or Nz(champ3) = "" Then
        MsgBox "Veuillez remplir tous les champs"
        Me.checkbox.Value = 0
    End If
End Sub
Quelle est la meilleure solution pouir résoudre ce problème ?

Par avance, merci de votre aide