Bonsoir

Comment suprimer en VBA le critère "Est Pas Null' pour un champ d'une requête

Voilà ce que j'ai testé mais çà marche pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub Modification_DblClick(Cancel As Integer)
Dim strSQL As String
strSQL = Replace("Requête Contrats", "WHERE (((Contacts.DateContrat) Is Not Null));", "")
CurrentDb.QueryDefs("Requête Contrats").SQL = strSQL
End Sub

Et comment créer en VBA le critère "Est Pas Null' pour le même champ de cette même requête

Voilà ce que j'ai testé mais çà marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
DoCmd.RunSQL "WHERE (((Contrats.DateContrat) Is Not Null));", -1
Pourriez-vous m'aider à corriger svp, merci d'avance