Lancer une requête paramétée en VBA

Bonjour,

Je travaille en VBA sous ACCESS.
J'ai une base de données dans laquelle j'ai créé des requêtes à partir des outils ACCESS et pas en VBA, ayant un champ variable en fonction d'une saisie dans un formulaire, que j'utilise dans différents programmes ultérieurs.
J'ai donc, dans ma table de requête, une colonne comportant un critère [nom formulaire]![nom du champ du formulaire] qui défini la variable à prendre enc ompte.
Je souhaite maintenant que ce critère ne soit plus rempli par le champ du formulaire mais par une variable VBA.
Ai-je été clair ?
Comment puis-je faire ?

Emmanuel 8O

En supposant que ton form reste ouvert pour pouvoir utiliser la valeur de ton champ, tu fais une fonction publique (dans un module standard) qui lit la valeur de ton champ.

A+

Merci de m'éclaircir sur ta réponse.

Emmanuel

En fait je lance la requête par la commande suivante :

Code:

---

DoCmd.OpenQuery "pagedegarde-1", acNormal, acEdit

---

et dans la requête j'ai la chose suivante (voir image jointe)


Cordialement.

Emmanuel

dans un module tu fais une fonction publique qui lit le champ de ta form
(ici exemple d'un champ String)

Code:

---

1 2 3 4

Public Function fLitMonChamp() As String fLitMonChamp = Forms("Formulaire1")![monTexte] Debug.Print fLitMonChamp End Function

---

Pour l'appeler, cf ci-joint

A+

Ok ça marche nickel je vais pouvoir avancer dans mon projet.

Emmanuel

PS. : Les gens de ce site sont vraiments sympas....