Discussion :

[USnico]

Bonjour a tous,

Avant de me faire "incendier", je dois préciser que j'ai recherché cette question dans la FAQ Access. Elle existe bien (utiliser une variable dans une requete...) et fait état d'un lien (Sommaire>VBA>Manipulation des données), page dans laquel je n'ai pas trouvé la question... Erreur d'aiguillage ou abus de boisson de ma part?

Revenons au propos: comment diable peux-on utiliser la valeur d'une variable comme critère de filtre dans une requete et plus précisement *?

J'ai bien compris qu'il fallait pour cela transmettre la valeur a travers une fonction qui est le critère de la requete. Cela semble fonctionner quand la fonction retourne une chaine de caractères mais plus du tout quand elle retourne * (tous les caractères = pas de filtre)... Dans ce cas, la requete ne renvoie aucun enregistrement.

Précision 1: quand je rentre en dur * comme critère de filtage de la requète, j'ai bien le résulat attendu (tous les enregistrements).
Précision 2: la fonction renvoie bien * et pas autre chose quand je l'interroge dans "Immediate Window".

Je subodore une question de syntaxe (ma bete noire)...

Merci de votre aide!

[Invité]

Bonjour

Peux-tu nous mettre la requête que tu as essayé de faire.

Starec

[USnico]

Bonjour,

Voici le SQL de la requete:

Code :

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

1
2
3
SELECT TMaster.*, TMaster.MasSite, TMaster.MasZone, TMaster.MasAxe, Int((([MasMois])-1)/3)+1 AS [Calcul Trimestre], "Q" & [Calcul Trimestre] AS [Trim]
FROM TMaster
WHERE (((TMaster.MasSite)=Return_Site_Filter()) AND ((TMaster.MasZone)=Return_Zone_Filter()) AND ((TMaster.MasAxe)=Return_TA_Filter()));

Return_Site_Filter(), Return_Zone_Filter() et Return_TA_Filter() sont 3 fonctions qui récupèrent la valeur de 3 variables publiques Site_Filter, Zone_Filter at TA_Filter.

Ces variables sont mises a jour grace a 3 combo box d'un formulaire qui sont alimentés par 3 tables. Si les combo box ne sont pas utilisés (chaine vide), la valeur retournée est par défaut fixée a "*".

Et c'est la que ca bloque... Les 3 fonctions récupèrent bien la chaine "*" mais la requete ne fonctionne plus...

[Jean-Philippe André]

bonjour,
si ta requête part dans du code VBA, il faut faire une concaténation des fonction avec le reste de la requête pour que les valeurs retournées soient bien prises en compte.

[USnico]

Ca y tes! Je crois avoir trouve le truc... Voici le SQL View de la requete modifié:

Code :

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

1
2
3
SELECT TMaster.*, TMaster.MasSite, TMaster.MasZone, TMaster.MasAxe, Int((([MasMois])-1)/3)+1 AS [Calcul Trimestre], "Q" & [Calcul Trimestre] AS [Trim]
FROM TMaster
WHERE (((TMaster.MasSite) Like "*" & Return_Site_Filter() & "*") AND ((TMaster.MasZone) Like "*" & Return_Zone_Filter() & "*") AND ((TMaster.MasAxe) Like "*" & Return_TA_Filter() & "*"));

Ca fonctionne correctement dans tous les cas de figure bien que la logique m'echappe encore (et pour longtemps j'en ai peur...); il faudra bien que quelqu'un m'explique pourquoi il faut ainsi barder le code de "*"...

A+.