Macro pour faire une liste déroulante conditionnelle

TeddyGalere -  
mrjenkins Messages postés 580 Date d'inscription   Statut Membre Dernière intervention   -
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

A voir également:

1 réponse

mrjenkins Messages postés 580 Date d'inscription   Statut Membre Dernière intervention   102
 
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



--
0