Discussion :

[zoom61]

Salut,

Est-il possible de faire ceci :

Code :

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

1
2
3
4
5
SELECT T_00.SITE, T_00.MAG, Sum(T_00.VAL) AS VAL
FROM T_00
GROUP BY T_00.SITE, T_00.MAG
HAVING (((T_00.SITE)=Formulaires!Formulaire1!val_1) 
And ((T_00.MAG)=Replace(Formulaires!Formulaire1!val_2," "," ou ")));

Mon problème vient de la fonction "Replace", si je mets "M01", cela fonctionne mais si je mets "M01 M04", je n'ai rien... comment faire sans faire de code !

J'ai essayé les formules suivantes et toujours le même résultat ou pire : rien.

Code :

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

1
2
3
"'" & Replace(Formulaires!Formulaire1!val_2," ","' ou '") & "'"
"""" & Replace(Formulaires!Formulaire1!val_2," ",""" ou """) & """"
Replace(Formulaires!Formulaire1!val_2," "," ou ")

avec "or" idem

[loufab]

Bonjour,

Ce qui donnerais ça ?!!

Code :

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

And ((T_00.MAG)="M01 ou M02")

Regarde plutot l'opérateur IN au lieu de =. Pour obtenir ceci :

Code :

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

And T_00.MAG IN ('M01','M02');

Tu peux utiliser le replace().

Cordialement,

[zoom61]

J'ai toujours le même problème la requête est vide :

Code :

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

1
2
3
4
5
SELECT T_00.SITE, T_00.MAG, Sum(T_00.VAL) AS VAL
FROM T_00
GROUP BY T_00.SITE, T_00.MAG
HAVING T_00.SITE=[Formulaires]![Formulaire1]![val_1] AND 
T_00.MAG="in ('" & Replace([Formulaires]![Formulaire1]![val_2]," ","', '") & "')";

ou

Code :

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

1
2
3
4
5
SELECT T_00.SITE, T_00.MAG, Sum(T_00.VAL) AS VAL
FROM T_00
GROUP BY T_00.SITE, T_00.MAG
HAVING T_00.SITE=[Formulaires]![Formulaire1]![val_1] AND 
T_00.MAG="in (""" & Replace([Formulaires]![Formulaire1]![val_2]," ",""", """) & """)";

[loufab]

Sans le = : In EST un opérateur logique.
Sans le " : In EST purement SQL.

Code :

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

"T_00.MAG IN ('" & Replace("tot1 toto2"," ","', '") & "')";"

Tu devrais utiliser la fenêtre d'exécution VBA pour voir ce que ça fait en exécution.

Code :

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

1
2
? "T_00.MAG IN ('" & Replace("tot1 toto2"," ","', '") & "')";"
T_00.MAG IN ('tot1', 'toto2')

Cordialement,

[zoom61]

Cela ne fonctionne pas...
Je passe à autre chose, car je voulais que cela fonctionne sans passer par du code...