Je souhaite executer la requete suivante : 

Dim SQL As String

SQL = "DELETE  FROM pointage where ID_POINTAGE = " & Me.txt_id_pointage.Value & " AND TJM.ID_TJM = POINTAGE.ID_TJM AND TJM.ID_CDE = COMMANDE.ID_CDE AND COMMANDE.ID_CDE = FACTURE.ID_COMMANDE AND ID_COMMANDE NOT IN (SELECT ID_COMMANDE FROM FACTURE);"

DoCmd.RunSQL SQL

Me.Requery

De telle sorte a supprimer les éléments de la table POINTAGE qui n'existent pas dans la table FACTURE

Merci

       Sql_Local = " ... ta requête ...."

MsgBox Sql_Local
       
        CurrentDb.Execute (Sql_Local)