Les zones de liste (ListBox) liées dans un formulaire personnalisé ou Userform, Excel VBA

Il est souvent nécessaire de s’assurer que les deux listes fonctionnent de manière cohérente. Par exemple, certains marchés peuvent être associés à certaines villes. Une liste de villes s’affiche dans une seule liste. Lorsque vous sélectionnez un élément dans cette liste, la deuxième liste affiche une liste de magasins.

Figure 1: Les zones de liste liées

Comment cela peut-il être accompli ? Les éléments d’un tableau peuvent être de type Variant, et une variable de type Variant peut être n’importe quoi, en particulier un autre tableau. Regardons le code suivant :

Dim city As Variant

Dim shop(2) As Variant

Private Sub UserForm_Initialize()

   city = Array("Yaounde", "Douala")

   shop(0) = Array("Marché Mokolo", "Marché du Mfoundi", "Marché Madagascar", "Marché Nvog-Mbi")

   shop(1) = Array("Marché Mboppi", "Marché Dakar", "Marché Congo")

   ListBox1.List = city

   ListBox1.ListIndex = 0

End Sub

Private Sub ListBox1_Click()

   ListBox2.Clear

   ListBox2.List = shop(ListBox1.ListIndex)

End Sub

 

S’abonner
Notifier de
0 Commentaires
le plus ancien
le plus récent le plus populaire
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x