Fermer un formulaire sans écrire d'enregnt

Résolu
lecrol Messages postés 224 Date d'inscription   Statut Membre Dernière intervention   -  
Le Pingou Messages postés 12273 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
J'ai un formulaire de saisie sur une table. A la fermeture du formulaire par un bouton de commande, j'ai une commande DoCmdClose. Mais je voudrais pouvoir empêcher dans certains cas l'écriture de l'enregistrement.
J'ai essayé le Docmd avec AcSaveNo mais sans résultat. J'ai quand même un enregistrement blanc qui s'ajoute à ma table.

Voici mon code:
If [Quantité vendue] > 0 Then
DoCmd.Close
GoTo Fin
End If
'
DoCmd.Close acForm, "F_ventesjour", acSaveNo
Exit Sub
-----------------------------

Merci par avance de vos lumières
Roland

1 réponse

  1. Le Pingou Messages postés 12273 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    Essayez avec cette instruction :
    If [Quantité vendue] > 0 Then 
       DoCmd.Close 
    Else
       DoCmd.RunCommand acCmdUndo
       DoCmd.Close 
    End If
    Exit Sub  
    0