Discussion :

[Beaver]

Bonjour à tous,

Je suis en train de créer un formulaire de recherche multicritère et la requête qui va avec en me basant sur le tutoriel de Claude LELOUP.

Je le trouve très abordable au vu de mes connaissances, mais il me semble qu'il a une limite ou en tout cas un parti pris que je ne parviens pas à contourner.

Je souhaiterais que lorsqu'un des critères n'est pas utilisé par la requête (champ de mon formulaire de recherche laissé null), les enregistrements qui contiennent un nul dans le champ correspondant de ma table soient quand même affichés.

Par exemple, si je filtre uniquement sur une liste déroulante (Service de l'organisation = Service 1) et que j'ai également un critère sur ma date, Access croise les deux et je perds tous les enregistrements Service 1 qui n'ont pas de date.



Syntaxe pour le service :

Code :

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

Comme VraiFaux([Formulaires]![F_Search]![LstAG].[ListIndex]=-1;"*" & [Formulaires]![F_Search]![LstAG] & "*";[Formulaires]![F_Search]![LstAG])

Syntaxe pour la date :

Code :

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

>=VraiFaux(EstNull([Formulaires]![F_Search]![TxtDateStart]);#1/01/1990#;[Formulaires]![F_Search]![TxtDateStart]) Et <=VraiFaux(EstNull([Formulaires]![F_Search]![TxtDateEnd]);#1/01/2100#;[Formulaires]![F_Search]![TxtDateEnd])

Cette syntaxe parvient à faire fi d'un null dans les champs date de mon formulaire de recherche. Par contre, je souhaiterais que si aucune date n'a été encodée dans ma table [T_Action]![ForeseenDate], ces enregistrements soient quand même affichés par la requête.

En résumé, tant que je n'agis pas sur un champ de mon formulaire de recherche, le champ correspondant de ma requête doit également m'afficher les null.

A titre d'information, mon seul champ obligatoire est le champ du Service de l'organisation.

Voyez-vous un moyen de contourner ce problème ?

[ClaudeLELOUP]

Bonjour,


Regarde ici : http://www.developpez.net/forums/d14...e/#post8065894

[Beaver]

Merci Claude !

Quoi de mieux que l'amélioration d'une solution par la personne à l'origine même de cette solution .

J'essaye d'appliquer tous ces enseignements et reviens vers toi quelle qu'en soit l'issue.

[Beaver]

Rebonjour,

J'ai passé les dernières heures à retourner le fil de discussion dans tous les sens. Je parviens à faire fonctionner les critères liés à des champs zones de liste déroulante, mais pas moyen pour les zones de textes et date. Je n'ai pas encore essayé les cases à cocher.

Mes relations me semblent pourtant correctes.



En SQL :

Code :

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

1
2
SELECT T_Action.IDAction, T_Action.RefAG, T_AG.AGShort, T_Action.ForeseenDate, T_Action.RefThemeStrat, T_Theme_Strat.ThemeStratTitle, T_Action.RefTarget, [T-Target].TargetTitle, T_Action.RefThemeAG, T_Theme_AG.ThemeAGTitle, T_Action.RefTargetAG, T_Target_AG.TargetAGTitle, T_Action.Description, T_Action.Message, T_Action.ExtInternet, T_Action.ExtSocialMedia, T_Action.ExtBrochure, T_Action.ExtAffichage, T_Action.ExtEcrans, T_Action.ExtPublicite, T_Action.ExtCommuniquePresse, T_Action.ExtConférencePresse, T_Action.ExtCourrier, T_Action.ExtMassMailing, T_Action.ExtSalon, T_Action.IntIntranet, T_Action.IntSocialMedia, T_Action.IntFininfoPapier, T_Action.IntFininfoElectronique, T_Action.IntMNL, T_Action.IntBrochure, T_Action.IntSeminaire, T_Action.IntAffichage, T_Action.IntCourrier, T_Action.IntMassMailing, T_Action.ChannelComment, T_Action.DependanceCSC, T_Action.DependanceAutre, T_Action.Budget, T_Action.Comments, T_Action.Contact, T_Action.Status, T_Action.Postponed, T_Action.Delayed, T_Action.Evaluation
FROM [T-Target] RIGHT JOIN (T_Theme_Strat RIGHT JOIN (T_Theme_AG RIGHT JOIN (T_Target_AG RIGHT JOIN (T_AG RIGHT JOIN T_Action ON T_AG.IDAG = T_Action.RefAG) ON T_Target_AG.IDTargetAG = T_Action.RefTargetAG) ON T_Theme_AG.IDThemeAG = T_Action.RefThemeAG) ON T_Theme_Strat.IDThemeStrat = T_Action.RefThemeStrat) ON [T-Target].IDTarget = T_Action.RefTarget

Je procède de la manière suivante :

Pour les zones de liste déroulante :

Code :

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

[Formulaires]![F_Search]![LstTheme] Ou [Formulaires]![F_Search]![LstTheme] Est Null

Pour les zones de texte :

Code :

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

Comme "*" & [Formulaires]![F_Search]![TxtMessage] & "*" Ou [Formulaires]![F_Search]![TxtMessage] Est Null

Pour les zones de date :

Code :

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

>=VraiFaux(EstNull([Formulaires]![F_Search]![TxtDateStart]);#1/01/1900#;[Formulaires]![F_Search]![TxtDateStart]) Ou [Formulaires]![F_Search]![TxtDateStart] Est Null Et <=VraiFaux(EstNull([Formulaires]![F_Search]![TxtDateEnd]);#1/01/2100#;[Formulaires]![F_Search]![TxtDateEnd]) Ou [Formulaires]![F_Search]![TxtDateEnd] Est Null

Où suis-je dans le faux ?

[ClaudeLELOUP]

Peux-tu poster ta db
- sans données confidentielles ;
- dans un format Access2000 ?

[Beaver]

J'ignore pourquoi, mais plus rien ne fonctionnait. Mon problème n'était pas dû à la syntaxe. J'ai fait un test et ma requête ne reconnaissait même plus les champs de mon formulaire de recherche.

Je pense que c'est en ordre, j'avoue ne pas avoir pris le temps de tester tous les cas de figure car j'ai une bonne trentaine de critères.

Pour mes cases à cocher, je laisse la possibilité à l'utilisateur de cocher toute une série de cases qui étaient à cocher à l'encodage. En gros, quand il la coche dans le formulaire de recherche, l'utilisateur veut voir apparaître seulement les enregistrements pour lesquels cette case a été cochée. S'il n'y touche pas, la requête doit alors afficher les deux valeurs possibles donc TOUS les enregistrements (et non pas uniquement ceux où la case n'avait pas été cochée à l'encodage).

J'ai utilisé la syntaxe suivante :

Code :

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

VraiFaux([Formulaires]![F_Search]![CochExtInternet]=-1;-1;[ExtInternet])

Elle semble fonctionner, mais comme c'est un peu différent de ce qui est renseigné dans ce post, je préfère soulever la question.

Merci en tout cas à Claude LELOUP et bravo à lui pour ses explications très claires et illustrées.

[ClaudeLELOUP]

Finalement, tu es dépanné ou pas ?

[Beaver]

J'en ai l'impression, mais pour passer le sujet en résolu, j'attendais juste d'avoir confirmation que mon critère "case à cocher" était fiable et que ça ne marchait pas par un concours de circonstance

[ClaudeLELOUP]

Ça a l'air bon.

Le mieux est que tu essaies et reviens si problème, mais avec une db exemple, car avant de proposer, j'aime bien d'abord tester.

À +

[Beaver]

Aucun couac constaté. Je passe le topic en résolu. Merci encore.