Discussion :

[Satch]

Bonjour,

J'ai cherché sur le net et dans les tuto mais je n'arrive pas à trouver de réponse claire et simple à ce problème :

J'ai une requête "reqhuhu" qui demande un paramètre "huhu" pour s'executer (C'est une requête ajout)

Je n'arrive pas en VBA a donner une valeur à ce paramètre pour qu'elle puisse s'éxécuter.
J'ai essayé un truc du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    Dim stDocName As String
    Dim req As DAO.QueryDef
    stDocName = "reqhuhu"
    Set req = CurrentDb.QueryDefs(stDocName)
    req.Parameters([huhu]).Value = Me![idClient].Value 'idClient existe bien dans le formulaire actif
    req.Execute

Et bien entendu, ça ne marche pas. il ne reconnait pas [huhu]

Comment faire ?

[MasterSleepy]

Salut,

Il ne faut pas mettre [huhu] mais "huhu" ;-)


A+,
MasterSleepy.

[Satch]

Merci !!
Voila donc le truc terminé.

Je commence à voir le bout du tunel en VBA

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    Dim definitionRequete As QueryDef
    Set definitionRequete = CurrentDb.QueryDefs("reqhuhu")
 
    definitionRequete.Parameters("huhu").Value = Me!idClient.Value
    definitionRequete.Execute