Créer un état en VBA (avec des paramètres)

Bonjour à tous :)

Mon problème est que les informations qui seront visualiés dans mon état ne seront pas statistiques, j'ai donc créé un état avec une requêtre avec paramètres.

Pour ouvrir un état on m,a dit :
Docmd.OpenReport "NomEtat", AcViewPreview

Mais où je spécifie les paramètres car je ne veux pas que l'utilisateur les entres à la main.

Mary

Merci pour votre aide :wink:

Bonjour,

Les paramètres sont définis dans ta requête, source de ton état...
Si ce n'est pas le cas, il faut le faire dans la requête.

Si j'ai bien compris le sens de ta question

@+

SE

C'est bien ça c'est une requete deja créé, et j'ai créer un état avec cette requete.

mais c'est un état que je veux ouvrir en VBA.
Lui spécifier les bon parametres pour sa requete et qu'il affiche les informations.

Lorsque tu parles de paramètres, tu parles de critères, de filtres, de conditions...?
Les as-tu définis dans ta requête?

...

SE

Si tu ouvres ton état en VBA, c'est que tu es dans un formulaire.
Tu peux positionner le filtre de ton état lors du docmd.openform :

Code:

---

DoCmd.OpenForm "Detail", , , iStr_Critere

---

ou iStr_Critere est une chaine de type clause Where, sans le where :

Code:

---

1 2	iStr_Critere = "SOrg = '" & lstSOrg.Value & "' " & _ "and MoisAnnee = '" & Format(gDat_DateTraitement, "MM/YYYY") & "'"

---

Par exemple, cette requete :

Code:

---

1 2 3

SELECT * FROM SH4 WHERE numeroSH4=[codeSH4];

---

Lorsque tu l'execute une boite de dialogue souvre et te demande d'entre le codeSH4. Le resultat de la requete sera en fonction de ce que tu as entré dans codeSH4.

En VBA, il est possible douvrir une requete, et d'y définir les parametres

Code:

---

1 2	Set requete = CurrentDb.QueryDefs("Select SH4 selon SH2") requete.Parameters("SH2") = Me!lstSH2.ItemData(codeSH2)

---

Ici le parametre était codeSH2 et je dis qu'il est égale a un item dans ma liste.

Mais j,ai créer un état a partir d'une requete comme cela. Lorsqu'on ouvre létat on doit entrer les parametres de la requete.

Je veux les définir dans VBA.


Maryse

Désolé,

Je ne comprends pas le sens de ta question sauf à te répondre de placer tes paramètres dans le SQL défini dans ton code VBA...

SE

Dans ton état, ta source va être

Code:

---

select * from SH4

---

et ton critère

Code:

---

"numeroSH4= " & CodeSH4

---

CodeSH4 étant saisi sur ton formulaire
Et sur le code du bouton "Ouvrir état", tu mets le doCmd.OpenReport