Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
  • Initiateur de la discussion Initiateur de la discussion marshland09
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

marshland09

Guest
Bonjour,

Après avoir écumé le web du mieux possible, je bloque. Je suis assez débutant en vba mais j'ai de bonnes connaissances dans d'autres languqges de programmation (php).

je voudrais créer des listbox "dynamiques/liées". Je m'explique:

1) Imaginons une première ListBox (à selection simple) prenant comme source de données la plage de cellules A1:A3 qui contiend toto, , titi et tata.

2) Et une deuxième ListeBox qui prend aussi la MEME plage de cellules.

Ce que je voudrais faire c'est que si avec la première ListBox je sélectionne titi (par exemple) et bien la deuxième listbox se mette à jour automatiquement et ne propose plus que les deux autres élements (soit toto et tata).

merci bien
 
Bonjour marshland09,

Pas certain d'avoir bien interprété la question. Une piste dans le fichier joint:
Le code pour ListBox1 :
VB:
Private Sub ListBox1_Change()
   ListBox2.List = ListBox1.List
   If ListBox1.ListIndex <> -1 Then ListBox2.RemoveItem ListBox1.ListIndex
End Sub

ou la version V1a qui ôte la sélection de Listbox2 quand Listbox1 change.
VB:
Private Sub ListBox1_Change()
   ListBox2.List = ListBox1.List
   If ListBox1.ListIndex <> -1 Then ListBox2.RemoveItem ListBox1.ListIndex
   ListBox2.ListIndex = -1
End Sub

 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…