Bonjour,

J'ai créé une requête dont un des champ se nomme "DateMut". J'aimerais que ce champ soit filtré grâce à une variable "Date_Edition". Cette date est saisie dans ma barre de ruban personnalisée dans une editBox.
Voilà ma ligne de code actuelle.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Public Sub txtDate_Change(ByVal control As IRibbonControl, text As String)
 
Dim Date_Edition As String
Date_Edition = text
 
Set qdf = CurrentDb.QueryDefs("1 CDU")
      With qdf
         .Parameters ("DateMut") > Date_Edition Or Null
         .Execute
      End With
 
End Sub

Lorsque j'actualise le control EditBox un message d'erreur s'affiche
"Erreur d'exécution 3251, Opération non autorisée pour ce type d'objet"

Si quelqu'un a une solution à me proposer, merci d'avance.
Cordialement
Mobydisk