Discussion :

[PhilC]

Dans la procédure ci-dessous : lorsque je monte le paramètre 'Cancel' j'ai un message système 'Access' qui s'affiche à la suite de la confirmation du mien :
Microsoft Open Form Access : l'action Open Form a été annulée.
et ceci malgré la commande DoCmd.SetWarnings False.
Quelqu'un sait-il comment éliminer le message Access?
D'avance merci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub Form_Open(Cancel As Integer)
' Test si maj possible?
DoCmd.SetWarnings False
Cancel = False
If Not PointagFini Then
    MsgBox "Pointage en cours." & vbCr & "Modification interdite!", vbOKOnly, "Erreur!"
    Cancel = True
End If
DoCmd.SetWarnings True
End Sub

[Arkham46]

slt,

apparement tu ouvres ton formulaire à partir d'une instruction Docmd.OpenForm

c'est là qu'il faut capturer l'erreur avec On Error ...

[PhilC]

Bonjour,
Tu as totalement raison, et je suis ton conseil.
Je t'en remercie infiniment.
Bonne journée.