Discussion :

[Lyude]

Bonjour,
j'aimerais pouvoir aficher un état selon le choix fait par l'utilisateur dans 3 champ. J'ai deux champ date, et une combobox. La combo box est la section du stagiaire, tandis que les champs date sont les dates d'entrée et de sortie du stagiaire. Ce sont des champs indépendant. Je veux faire en sorte qu'on ouvre l'état selon le statut du stagiaire et selon que la date d'entrée se situe entre les deux champs date. Il y a également une zone de liste appelée lstResults pour afficher les résultats de la recherche faite sur ces champs.

J'ai entré ce code ci :

Code :

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

 DoCmd.OpenReport stDocName, acViewPreview, , ([Formulaires]![Formulaire recherche Date Entrée]![txtEntrée])<=[infoStagiaire]![Date d'entrée]) AND (([infoStagiaire]![Date d'entrée])<=[Formulaires]![Formulaire recherche Date Entrée]![txtSortie] AND (([infoStagiaire].[Section désirée]=[Formulaires].[Formulaire recherche Date Entrée].[CmbSection])

J'ai donc mis ce que je mettrais dans un where en temps normal, ici je l'avais fait dans l'éditeur de requêtes et j'ai pris le code en faisant passer la requête en mode sql, mais ca ne fonctionne pas, il ne comprend pas ce que je lui veux. J'ai essayé de remplacer les ! par des ., j'ai essayé des requêtes plus courtes comme ceci :

Code :

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

    DoCmd.OpenReport stDocName, acViewPreview, , "[Section désirée]=  Me.cmbSection"

(ne fonctionne pas)
ou ceci

Code :

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

    DoCmd.OpenReport stDocName, acViewPreview, , "[N°Client]= " & Me.lstResults

(fonctionne mais ne rend que l'utilisateur sélectionner)

Ce que j'aimerais faire est d'afficher dans l'état l'ensemble des personnes qui ont été filtrée et apparaissent dans la listbox. Donc tout ceux qui sont dans tel section et dont la date de début de stage se trouve entre les 2 autre dates.

J'espère avoir été clair, merci d'avance.

[loufab]

bonjour,

Tu adapte donc la 3ème syntaxe à ton cas.

Code :

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

docmd....... ,"[champnumérique]=" & me.moncontrole & " AND [champtexte]=""" & me.moncontrole & """ OR [champdate]=#" & me.moncontrole & "#"

NOTE QU'EN VBA les dates sont TOUJOURS exprimées au format UK donc mm/jj/aaaa.

La 1ere ne fonctionne pas il faut passer une valeur et non la référence à un formulaire, la 2ème il manque le & et tu inclus la syntaxe VBA dans la SQL.

Cordialement,

[Lyude]

Merci de la réponse, mais je cherche mais je ne vois pas comment changer les champs dates visible pour qu'une fois la date insérée on ai le format UK. Il y a surement une fonction qui le permet mais je ne la trouve pas.

D'après ce que tu me dis, il faut que dans la requète la date soit à ce format la, mais on n'a pas la possibilité de le choisir au départ dans les champs, il faut donc le transformer d'une manière ou d'une autre, mais comment peut on le faire? il y a une fonction qui le permet?

[Jeannot45]

Dans les tutos, il y a quelques bases exemples qui pourraient t'apporter une réponse pour paramétrer ton impression :

Exemple :

Imprimer un planning

Tu y trouveras notemment comment paramétrer le format UK pour la date

Bonne lecture