Macro pour faire une liste déroulante conditionnelle

[Fermé]
Signaler
-
Messages postés
577
Date d'inscription
jeudi 22 novembre 2007
Statut
Membre
Dernière intervention
17 juillet 2018
-
Bonjour la communauté,

J'ai un petit soucis de macro, je ne sais pas quel code rentrer pour réaliser une conditionnelle sur une liste déroulante.
Je m'explique:
Normalement dans mon formulaire, quand je créé une liste déroulante je vais dans les propriété de la liste et j'indique la source la plage de mes données dans "Row Source".
Cependant la j'ai une liste déroulante appelé "ComboBox_Consult1" dont la plage de donnée source doit pouvoir varié selon la donnée choisi dans la liste intitulé "ComboBox_Dept".

Ainsi si la liste "ComboBox_Dept" affiche la valeur A, alors la liste "ComboBox_Consult1" devra allé chercher les données possibles à l'endroit suivant "Données!A2:A10".
S
i la liste "ComboBox_Dept" affiche la valeur B, alors la liste "ComboBox_Consult1" devra allé chercher les données possibles à l'endroit suivant "Données!A18:A21"

Etc...

Quelqu'un aurait-il la solution??

En vous remerciant

1 réponse

Messages postés
577
Date d'inscription
jeudi 22 novembre 2007
Statut
Membre
Dernière intervention
17 juillet 2018
93
Salut,

il suffit de changer la Row Source dans le code de ta macro. Avec cette fonction :


Private Sub ComboBox_Dept_Change()
    Select Case ComboBox_Dept.Value
        Case "A"
            ComboBox_Consult1.RowSource = "Feuil1!B1:B10"
        Case "B"
            ComboBox_Consult1.RowSource = "Feuil1!B11:B15"
        Case Else
            'blabla
    End Select
End Sub



--