Bonjour,

J'aimerai pouvoir sur click d'un bouton effacer l'enregistrement en cours.

Mais mon bout de code ne fonctionne pas. Qqn peux me dire pourquoi?

Merci d'avance

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim strSQLForm As String
 
    DoCmd.Save acForm, "frmCaisseEntrees"
    DoCmd.SetWarnings False
 
    strSQLForm = "DELETE * FROM Tbl_Factures WHERE N°Fact = '" & Me.N°Fact & "';"
 
    DoCmd.RunSQL strSQLForm
 
    DoCmd.Close acForm, "frmCaisseEntrees", acSaveNo