Combobox en cascade Bug

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 !

Florian53

XLDnaute Impliqué
Bonjour à tous,

J'ai récupéré un code afin de réaliser 2 combobox en cascades :

Sur le 1er combobox, j'ai 5 choix et les 3 premiers fonctionnent bien ( c'est à dire alimente la combobox N°2) mais pas les 2 autres. Je n'arrive pas à comprendre pourquoi .


Merci à vous
 

Pièces jointes

Bonjour.
Essayez comme ça :
VB:
Private Sub ComboBox1_Change()
Dim NomRange As String, SsLst As Range
If ComboBox1.Value = "" Then Exit Sub
ComboBox2.Clear
NomRange = CaracSpec(ComboBox1.Value)
If NomDefini(NomRange) Then
   Set SsLst = Range(NomRange)
   If SsLst.Rows.Count > 1 Then ComboBox2.List = SsLst.Value Else ComboBox2.List = Array(SsLst.Value)
Else
    ComboBox2.AddItem """Aucun centre de coût"""
End If
End Sub
 
- 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

Discussions similaires

Réponses
40
Affichages
1 K
Réponses
8
Affichages
103
Réponses
28
Affichages
2 K
Réponses
4
Affichages
134
Retour