Discussion :

[Ishrimak]

Bonjour,

Je suis en train de développer un petit utilitaire de saisie pour un outil d'audit immobilier, et j'aurai besoin de créer un formulaire de saisie ergonomique, mais je me heurte à un problème :

En fait, la saisie dans le formulaire se fait grace à un menu déroulant, mais il faudrait que suite au choix fait dans ce menu, un NOUVEAU menu déroulant s'affiche en dessous, et qu'il affiche des sous choix dépendant du choix fait dans le premier menu.

Un petit exemple pour illustrer tout ça :

1. Dans mon premier menu, je sélectionne Bureau parmi (bureau, couloir, salle technique)
   
2. Ce choix fait apparaitre un 2e menu ou l'on peut sélectionner sol, mur, plafond, electricité. Je sélectionne électricité
   
3. Ce choix fait apparaitre un 3e menu qui me permet de choisir : prise, interrupteurs, plinthes ...

Il faut donc que la création du 2e menu soit conditionné par le choix du premier, puisque j'ai besoin non seulement de modifier son intitulé, mais aussi la table sur laquelle il se base.

J'ai ensuite besoin de répéter l'opération plusieurs fois, cad que la sélection du 2e menu crée un 3e menu, etc ...

J'ai déjà réussi à faire à l'aide du forum un formulaire avec des menus pré-établis, qui affichent des choix filtrés en fonction des choix précédents, mais je n'ai pas trouvé comment conditionner le choix de la table sur laquelle se base le menu en fonction du choix précédent


Mes questions sont donc les suivantes :

• Est-ce possible ?
• Si oui, comment faire ?

Merci d'avance pour votre aide !

[cyraile]

Sur l'évènement 'sur changement' de ta L1 (liste 1) tu va modifier la valeur de L2.rowSource

Code :

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

1
2
3
4
5
6
7
 
Private Sub L1_Change()
    if (L1.value <> "") then
        L2.rowSource="Select * FROM uneTable WHERE id=" & L1.value & ";"
        L2.requery
    end if
End Sub

Si la liste L1 n'est pas vide alors on met a jour la liste 2 en fonction de la liste 1

Si tu precise tes tables et tes champs je pourrais t'aider un peu plus, ainsi que les tables liées a L1, L2, et L3.

[scorpion1611]

http://access.developpez.com/faq/?page=zdl#DepZdl

[cyraile]

C'est vrai je me complique un peu plus la vie -- je n'ai jamais pensé a cette astuce et j'ai pris mon habitude

[Ishrimak]

Merci pour le lien vers la FAQ, je l'avais déjà vu, mais je n'arrivais pas à le mettre en oeuvre pour mon application, parce que dans mon cas on doit choisir une table spécifique en fonction du choix, et non pas appliquer un filtre tout en sachant déjà quelle table sera utilisée ...

Mais Cyraile, ton astuce fonctionne parfaitement, j'ai réussi à faire ce que je voulais.

Maintenant, mais c'est un détail, j'aimerai que le menu déroulant se créer au moment ou je click sur mon choix, parce que suivant mes choix dans les menus, je pourrai avoir besoin de 3 ou 5 sous-menus ....

[Lola21]

J'avais réussi à résoudre mon problème de menu déroulant dépendant du choix réalisé dans un menu déroulant précédent, grâce à la discussion suivante :

http://www.developpez.net/forums/sho...nu+d%E9roulant

Bon courage !

[Ishrimak]

Merci encore une fois pour le lien, que j'avais aussi déjà trouvé, mais encore une fois je n'arrivais pas à le transposer à mon problème puisque je devais jongler entre plusieurs tables.

Je me heurte maintenant à un nouveau probleme ... Comment recopier les valeurs sélectionnées dans une table vierge pour effectuer des enregistrements ? J'ai consulté la FAQ et je dois certainement être stupide, mais impossible de mettre la main sur l'option "recordsource" mentionnée (http://access.developpez.com/faq/?pa...s#RemplirTable)

Dois-je changer de cerveau ? :p

[FreeAccess]

Bonjour,

je dois certainement être stupide, mais impossible de mettre la main sur l'option "recordsource" mentionnée

Sur ton formulaire en mode création, tu as en haut à gauche un petit carré quand tu clique sur celui ci il se transforme en un petit carré noir.
A partir de ce moment là tu as accés aux propriétés du formulaire. Sous l'onglet 'Données' tu trouve la propriété 'Source'
Bonne continuation.

[Lola21]

Salut,

Si j'ai bien compris ton problème, tu doit avoir 3 listes déroulantes dont chacune dépend de la précédente.
Je vais essayé de t'expliquer comment j'ai fait, voir si ça peux te servir pour ton appli.
Admettons que tes 3 tables sont décrites de la façon suivante :
- t_A : A_id, A_nom
- t_B : B_id, A_id, B_nom
- t_C : C_id, B_id, C_nom
Les champs A_nom, B_nom et C_nom sont ceux que tu aimerai afficher.

Tu crèe d'abord tes trois listes déroulantes.
Puis dans le menu propriétés, tu mets dans l'onglet Données les Source suivantes pour chaque liste :

- 1ère liste : SELECT [t_A].[A_id], [t_A].[A_nom] FROM t_A;
- 2ème liste : SELECT [t_B].[B_id], [t_B].[B_nom] FROM t_B WHERE ((([t_B].[A_id])=[Forms]![NomDeTonFormulaire]![A_nom]));
- 3ème liste : SELECT [t_C].[C_id], [t_C].[C_nom] FROM t_C WHERE ((([t_C].[B_id])=[Forms]![NomDeTonFormulaire]![B_nom]));

Après tu vas dans les propriétés de ta 1ère liste, dans l'onglet Évènements, après MAJ, tu clique sur les trois points et tu mets ce code :

Code :

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

1
2
3
4
5
Private Sub A_nom_AfterUpdate()
Me.B_nom.Requery
Me.B_nom.SetFocus
Me.B_nom.Dropdown
End Sub

Puis au même endroit, mais dans ta 2ème liste déroulante, tu marques le code suivant qui est similaire :

Code :

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

1
2
3
4
5
Private Sub B_nom_AfterUpdate()
Me.C_nom.Requery
Me.C_nom.SetFocus
Me.C_nom.Dropdown
End Sub

Voilà, normalement ça devrait marcher ... En tout cas ça marche chez moi

J'espère que ça te sera utile !
Bon courage!!