Macro pour faire une liste déroulante conditionnelle

Question

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
Configuration: Windows 7 / Firefox 38.0

mrjenkins · Answer

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

--

Macro pour faire une liste déroulante conditionnelle

1 réponse

Votre réponse

Discussions similaires

Newsletters