Mise à jour 2 champs formulaire à partir de liste déroulante s'appuyant sur une table de référence

Bonjour,

suite à la solution proposée par madefemere qui convient tout à fait pour initialiser 2 champs à partir de la référence d'une table de référence à 'louverture du formulaire, je souhaite maintenant réaliser l'opération plus compliquée .

Je m'appuie sur l'exemple fourni par "madefemere" pour expliquer mon problème et je joins le fichier zippé de la base access.
J'ai rajouté dans la table de référence d'autres domaines fonctionnels (02-Tax, 05-Legal) pour bien expliquer l'objectif

1/ Mon objectif est de sélectionner dans la liste déroulante du champ "domaine fonctionnel niveau 1" du formulaire, le bon domaine fonctionnel => cela implique ,dans la liste déroulante, de faire un regroupement et de n'afficher que les noms des domaines fonctionnels uniques type
03-Finance
02-Fiscalité
05-Juridique

Actuellement, je liste toute la table (cf img liste déroulante DF1.jpg ).
=> Une fois sélectionné, la mise à jour du numéro de domaine fonctionnel doit se faire dans la Table donnee

2/ Une fois sélectionné le domaine fonctionnel niveau 1 ( ex : 03-Finance ), je souhaite que dans le champ "domaine fonctionnel niveau 2", je puisse lister uniquement les libellés des noms des domaines fonctionnels niveau 2 attachés au domaine fonctionnel niveau 1. Ainsi, lorsque je cliques sur la liste déroulante du domaine fonctionnel niveau 2, je dois voir apparaître uniquement pour l'exemple choisi :

-blanc-
Comptaibilité et reporting
Gestion et comunication financières, développement

Actuellement, je liste toutes les références de niveau 2 des domaines fonctionnels (cf img liste déroulante DF2.jpg ).

=> Une fois sélectionné, la mise à jour du numéro de domaine fonctionnel doit se faire également dans la Table donnee

Merci par avance pour votre aide.

Bonsoir,

Pour la 1ere liste il suffit de préciser "select distinct" dans son rowsource pour éliminer les doublons
Pour la 2e liste il y a plusieurs solutions, j'utilise celle-ci :

Code:

---

1 2 3

Private Sub liste2_Enter() liste2.RowSource = "SELECT niveau2 FROM MaTable where niveau1=" & liste1 & " union select '-blanc-' from MaTable ORDER BY 1;" End Sub

---

L'union sert à ajouter le choix blanc et le distinct est alors implicite.

Bonjour marcelisa2, nico84,

Avec la structure de tes tables c'est impossible de faire ce que tu veux directement. Pour arriver à une solution qui reflète tes désirs le CboDomaineFoncti1 doit être indépendant. Le N° Domaine fonctionnel doit avoir une colonne de plus. Tu dois modifier la source avec du VBA. Je t'ai fait un exemple.

Bonne journée

Bonsoir,

Merci beaucoup Robert1957 & nico84
J'ai analysé la solution. C'est pratiquement ce que je recherche. Il reste un point.

Une fois mis à jour le numéro de domaine fonctionnel dans la Table des données, à l'ouverture suivante du formulaire, les 2 champs domaines fonctionnel niv1 et niv2 , n'affichent pas exactement les information issues de la table de référence. Ainsi pour le numéro 126 enregistré dans la table de donnée, nous devrions ouvrir avec "02-Fiscalité" en domaine fonctionnel niv1 et "Conseil fiscal et gestion" en domaine fonctionnel niv2. actuellement, nous avons les anciennes valeurs "03-Finances" et " " pour les 2 champs.

Merci encore pour votre aide
cordialement

Bonjour marcelisa2,

Petit oubli de ma part, il faut rafraichir le CboDomaineFonction1 sur l'événement Form_Current:

Code:

---

1 2 3

If Not IsNull(Me.N°_Domaine_fonctionnel) Then Me.CboDomaineFoncti1 = Me.N°_Domaine_fonctionnel.Column(1) End If

---

Bonne soirée

Bonjour Robert1957
Merci beaucoup. C'est parfait.
Juste une dernier point.

Concernant le dernier point, si le champ n° domaine fonctionnel n'est pas visible sur le formulaire, comment réinitisalise t-on les 2 champs Domaine fonctionnel niv1 et niv2 à la prochaine ouverture du formulaire?

Encore merci pour les rapides retours.

Bonjour marcelisa2,

S'il est juste invisible mais toujours présent il n'y a pas de problème.

Bonne journée

bonjour Robert1957
Merci encore.
Sachant qu'il y a une liste déroulante au niveau du champ, j'ai essayé de le rendre invisible sans succès. comment peut on effectuer l'opération?
Merci

Bonjour marcelisa2,

En mode création, dans la Feuille de propriétés, onglet Format à la ligne Visible = Non

Bonne journée

Bonjour Robert1957,

Pour ce dernier point, je n'avais probablement pas les yeux en face des trous :zoubi:
C'est parfait. C'est tout à fait ce que je cherchais.
Merci encore