Discussion :

[Salsaboy60]

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

[Salsaboy60]

j'ai trouvé un méthode. J'ai ajouter après le Save un Refresh et ça fonctionne comme ça.