Discussion :

[Marie_2116]

Bonjour,

J'ai créée le code qui alimente une zone de liste déroulante.
Je souhaite que cette liste "Departement" soit filtrée par par 2 autres listes déroulantes : "Région" et "NOM_REPR".

A chaque liste j'ai rajouté "- Tous -" si on ne souhaite pas faire de sélection du critère en question.
J'ai mis "- Tous -" en choix par défaut sur chaque liste.

Je souhaiterai qu'on puisse choisir directement un département sans avoir fait de sélection de REPR ni de Région (càd Tous sélectionné).
Or à l'ouverture de mon formulaire, seul le Tous apparait dans département alors que je souahiterai qu'il y ait tous + la liste des départements.
De même, je souhaite que cette liste département soit filtrée par les choix faits précédemment en Région et ou en commercial.

Voilà le code que j'ai :

Code :

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

1
2
3
4
5
6
'Création de la zdl Departement selon choix fait dans la zdl Région + 0 commandes depuis 2005 + ajout de "Tous" à la liste
Me.Departement.RowSource = "SELECT DISTINCT Departement FROM Recap1 " & _
"WHERE ((Région = Formulaires!Recherche_liste_prospects!Région) " & _
"AND (NOM_REPR = Formulaires!Recherche_liste_prospects!NOM_REPR) " & _
"AND ((Total_cde_5) Is Null) AND ((Total_cde_6) Is Null) AND ((Total_cde_7) Is Null))) " & _
"UNION SELECT " & Chr(34) & "- Tous -" & Chr(34) & " FROM Recap1;"

Je crois que je me suis emmelée les pinceaux avec les AND et que du coup ma condition WHERE est fausse...

Est ce que quelqu'un voit l'erreur ? Parce que je débute en code, et je en comprends pas mon erreur

Merci de votre aide

[giloo(94)]

sauf erreur ,je crois bien qu'il n'y a pas de departement : -tous-(que je change par * pour voir tous les departements)
et aussi tu voulais par region ou par nom_repr
donc changement d'un and par un or

voici le code modifié:

Code :

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

1
2
3
4
5
6
'Création de la zdl Departement selon choix fait dans la zdl Région + 0 commandes depuis 2005 + ajout de "Tous" à la liste
Me.Departement.RowSource = "SELECT DISTINCT Departement FROM Recap1 " & _
"WHERE (((Région = Formulaires!Recherche_liste_prospects!Région) " & _
"or (NOM_REPR = Formulaires!Recherche_liste_prospects!NOM_REPR)) " & _
"AND ((Total_cde_5) Is Null) AND ((Total_cde_6) Is Null) AND ((Total_cde_7) Is Null))) " & _
"UNION SELECT " & Chr(34) & "*" & Chr(34) & " FROM Recap1;"

en esperant que va donne ce que tu veux

[Marie_2116]

Merci d'avoir répondu,
mais cela ne correspond pas exactement à ce que je souhaite faire...
En effet je souhaite que les 2 critères : NOM_REPR et Région soient pris en compte pour filtrer la liste Departement.

Il n'y a effectivement pas de Departement 'Tous' mais je l'ai créer...

Et j'avais déjà essayé avec OR et cela ne fonctionne pas mieux,
mais merci qd mêm !

[Marie_2116]

en fait j'ai trouvé en faisant autrement, avec des "if"