Discussion :

[Fafma67]

Bonjour!

Dans une requête de Access 2002, je voudrais simplifier mon expression en ne répétant pas à chaque fois le nom du champ.

C-à-d:

Code :

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

VraiFaux([Contact]comme "*malade*" ou [Contact]comme "*CHSLD*" ou [Contact]comme "*avis*","Rejeté",Null)

J'ai beau cherché, je ne trouve pas.

Merci de votre aide!

[Didier71]

Bonsoir

Je n'ai aucune idée de la syntaxe, ni même si ça peut marcher, mais tu pourrais essayer peut être

Code :

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

1
2
3
 
 
VraiFaux([Contact] IN Array("*malade*" ;"*CHSLD*";"xxxx";"xxx" .....)

Bon Courage

Didier71

[Chtulus]

Bonsoir,

Je crois que l'on est sous Access.....

[Fafma67]

Oui Chtulus, on est bien en Access 2002. Je tente de créer une expression dans le champ d'une requête (pas en SQL). Ma question manque-t'elle de précision?

Merci Didier71 pour ta réponse.

Mais "array" ne semble pas fonctionner en mode requête et l'opérateur "IN" semble fonctionner avec des valeurs complète mais pas avec des valeurs partielles (*x*). À moins que la syntaxe ne soit pas encore correcte.

Merci!

[Chtulus]

Salut Fafma67,

Tu n'étais pas visé par mon intervention

Mais Didier71, oui

Bonne soirée

[Didier71]

Bonjour !

Je sais qu'on est sous Access, d'ailleurs, j'avais bien prévenu que je ne savais pas si ça marchait, en particulier le IN

Pour ma part, j'ai déja passé des tableaux (Array) en paramètres dans des fonctions, et ça marche...
Ensuite, il faut utiliser les fonctions Lbound() et Ubond() pour parcourir les valeurs du tableau..(mais en VBA, pas en mode requête.)
Peut être que pour ce cas il faudrait créer une fonction de ce genre...
et l'appeler dans le requeteur....

Bon courage..

Didier71

[DMboup]

Bonjour

Avec VraiFaux, je penses que tu n'a pas d'autres solutions que la répétition.

[loufab]

bonjour,

Pourquoi ne pas créer tout simplement ta propre fonction en VBA.

Code :

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

1
2
3
4
5
6
7
8
9
function ContactValide(monContact as string) as boolean
     ContactValide = vbfalse
     if monContact like "*malade*" then 
        contactValide = vbtrue
        exit function
     endif
     if .....
 
end function

J'ai fait simple.

Pour l'appel c'est comme une fonction native.

Code :

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

vraifaux(ContactValide([Contact]);"je suis vrai";"je suis faux")

Petite précision concernant In, ça fonctionne très bien mais avec des valeurs compléte,
On ne mélange pas les jokers du like avec le in. Ceux-ci étant 2 OPERATEURS. Un peut comme si vous vouliez faire == ou =+ ou encore AND OR... Inutile de surcharger avec un tableau (array) il suffit de regarder la doc.

Donc le

Code :

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

IIf([nom] In ("CHLSD","malade"),"oui","non") AS Expr1

fonctionne.

Cordialement,

[Fafma67]

Bonjour!

Merci Loufab pour ta solution, j'en comprend le principe mais à la base je ne suis pas programmeur. Et comme j'utilise régulièrement ce genre d'expression, j'aurais souhaité trouver une solution me permettant de continuer d'utiliser les champs calculés.

J'ai continué mes recherches mais nada pour l'instant.

Merci à tous!

[loufab]

Et tu ne trouvera rien, les solutions sont dans le post.

Soit la répétition avec iif, soit une fonction que tu utiliseras comme une native.

De loin je préfére une fonction propriétaire à des répétitions.

[Fafma67]

Alors je vais me débrouiller avec ça.

Merci pour votre temps et votre aide!