Discussion :

[gbzmt]

bonjour,

N'ayant pas eu de réponse hier, je me permets de reposer mon probléme:

Je souhaite créer un recordset basé sur une requête dont un champ est calculé (Valeur d'un champ d'un formulaire ouvert- valeur d'un champ de la table origine de la requête)
Mais l'éxecution du code :

Code :

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

Set AnnCatg = MaBase.OpenRecordset("AnnéesCatég", dbOpenDynaset)

l'erreur suivante est annoncée:
Erreur d'éxecution '3061'
Trop peu de paramètres. 1 Attendu
Faut-il rappeler la valeur contenue dans le champ du formulaire?

Voici le code SQL:

Code :

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

1
2
3
4
SELECT DateCatégorie.Catégorie, DateCatégorie.AgeMin, DateCatégorie.AgeMax, [Formulaires]![ACCUEIL]![Saison]-[DateCatégorie]![AgeMax] AS AnMax, [Formulaires]![ACCUEIL]![Saison]-[DateCatégorie]![AgeMin] AS AnMin
FROM DateCatégorie
GROUP BY DateCatégorie.Catégorie, DateCatégorie.AgeMin, DateCatégorie.AgeMax, [Formulaires]![ACCUEIL]![Saison]-[DateCatégorie]![AgeMax], [Formulaires]![ACCUEIL]![Saison]-[DateCatégorie]![AgeMin]
ORDER BY DateCatégorie.AgeMin;

Si quelqu'un peut m'expliquer,
Merci d'avance

[=JBO=]

Bonjour,

Pour commencer, tu devrais ouvrir directement la requête "AnnéesCatég" à partir de la fenêtre de Base de données d'Access.

Ainsi tu sauras quel est le "paramètre manquant" qui pose problème. Si c'est un problème de syntaxe, alors tu sauras où agir...
_

[gbzmt]

Merci pour ton tuyau mais l'ouverture de la requête à partir de la fenêtre base de données ne pose pas de problème si le formulaire contenant le champ saison est ouvert.

[LedZeppII]

Bonsoir,

Il faut utiliser cette méthode : Comment utiliser en VBA une requête existante ?

Pour toi le nom du paramètre est : [Formulaires]![ACCUEIL]![Saison]

Code :

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

qdf.Parameters("[Formulaires]![ACCUEIL]![Saison]") = Forms("ACCUEIL").Saison     '<== si requête paramétrée

A+

[=JBO=]

Merci pour ton tuyau mais l'ouverture de la requête à partir de la fenêtre base de données ne pose pas de problème si le formulaire contenant le champ saison est ouvert.

J'avais cru lire ceci...

Valeur d'un champ d'un formulaire ouvert

Faudrait quand même savoir... ouvert ou pas ouvert ton formulaire !?
_

[=JBO=]

Re-bonjour,

Si ton formulaire est effectivement ouvert, alors tu peux modifier ta requête en utilisant la fonction Eval pour récupérer la valeur du contrôle.

Donc, dans le corps de la requête tu remplaces:

Code :

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

[Formulaires]![ACCUEIL]![Saison]

Par:

Code :

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

Eval("[Forms]![ACCUEIL]![Saison]")

Ce qui donne:

Code SQL :

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

1
2
3
4
SELECT DateCatégorie.Catégorie, DateCatégorie.AgeMin, DateCatégorie.AgeMax, Eval("[Forms]![ACCUEIL]![Saison]")-[DateCatégorie]![AgeMax] AS AnMax, Eval("[Forms]![ACCUEIL]![Saison]")-[DateCatégorie]![AgeMin] AS AnMin
FROM DateCatégorie
GROUP BY DateCatégorie.Catégorie, DateCatégorie.AgeMin, DateCatégorie.AgeMax, Eval("[Forms]![ACCUEIL]![Saison]")-[DateCatégorie]![AgeMax], Eval("[Forms]![ACCUEIL]![Saison]")-[DateCatégorie]![AgeMin]
ORDER BY DateCatégorie.AgeMin;

Si ton formulaire est fermé, alors LedZeppII t'a montré la voie...
_

[gbzmt]

Vous êtes formidables !!!