Bonjour à tous,


Me voila coincé lors de la réalisation d'une petite application servant à remplir une base de données.

J'ai inséré 3 listbox (contrôles ActiveX). Je souhaite les rendre dépendantes l'une par rapport à l'autre (équivaut à la fonction indirect).

Pour la deuxième listbox, par de problème, elle dépend bien du choix effectué dans la première, et si on clique sur un choix qui ne correspond à aucune liste encore enregistrée, alors la ListBox2 se vide automatiquement .

Pour la ListBox3, cela fonctionne uniquement si je clique directement sur la bonne valeur du premier coup. Si je veux modifier ma sélection dans la ListBox2, la ListBox3 ne prend pas en compte cette modification .

Voici les codes que j'ai inscrit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub ListBox1_Click() 'atelier
atelierconcerne = ListBox1.Value
With ListBox2
.ListFillRange = atelierconcerne
End With
End Sub
 
Private Sub ListBox2_Click() 'machine
machineconcernee = ListBox2.Value
With ListBox3
.ListFillRange = machineconcernee
End With
End Sub
 
Private Sub ListBox3_Click()
 
End Sub
Ces codes visent à modifier la liste liée à la ListBox.

Merci par avance pour votre aide.