programmation VBA du Paramètre d'une requête
Bonjour, j'ai une requête qui est construite en dur, J'ai un Parametre Dates, donc qui est présent dans les Critères et dasn la fenetre Paramètre, j'essaye de renseigner ce paramètre via une procédure VBA comme ceci:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
|
Private Sub Ctl12___11468_Click()
Dim bd As Database
Dim record As Recordset
Dim y As Parameter
Dim x As Date
Set bd = CurrentDb
Dim qdf As QueryDef
'référence à la requête
Set qdf = CurrentDb.QueryDefs("Base_Fiche2")
qdf.Parameters("Dates").Value = #1/3/2007#
DoCmd.OpenQuery "Base_Fiche2"
Set qdf = Nothing
End Sub |
A cahque fois lors de l'exécution de la requete la boite de dialogue me demandede renseigné le paramètre, la procédure VBA ne le fait pas,pourtant je n'obtiens pas de message d'erreur
Que Faire?
Merci