Combobox
Résolu
abdellah_tadjine
Messages postés
191
Date d'inscription
Statut
Membre
Dernière intervention
-
abdellah_tadjine Messages postés 191 Date d'inscription Statut Membre Dernière intervention -
abdellah_tadjine Messages postés 191 Date d'inscription Statut Membre Dernière intervention -
3 réponses
Bonjour,
Utilisez les événements disponibles en VBA.
Supposons que vous vouliez afficher dans la combobox2, le résultat de la combobox1 lorsque vous changez la valeur de combobox1.
Alors le code sera (à mettre dans le UserForm) :
Petit fichier excel Exemple :
https://www.cjoint.com/c/GBjmGDKdsrf
Cordialement.
Utilisez les événements disponibles en VBA.
Supposons que vous vouliez afficher dans la combobox2, le résultat de la combobox1 lorsque vous changez la valeur de combobox1.
Alors le code sera (à mettre dans le UserForm) :
Private Sub UserForm_Initialize()
With ComboBox1
.AddItem "analyse"
.AddItem "consultation"
.AddItem "radiologie"
End With
End Sub
Private Sub ComboBox1_Change()
If Me.ComboBox1.Value = "analyse" Then
With Me.ComboBox2
.AddItem "ORL"
.AddItem "endos"
.AddItem "orthopédie"
.AddItem "etc..."
End With
ElseIf Me.ComboBox1.Value = "radiologie" Then
With Me.ComboBox2
.AddItem "scanner"
.AddItem "télé"
.AddItem "thorax"
.AddItem "ITM"
.AddItem "etc..."
End With
End If
End Sub
Petit fichier excel Exemple :
https://www.cjoint.com/c/GBjmGDKdsrf
Cordialement.
abdellah_tadjine
Messages postés
191
Date d'inscription
Statut
Membre
Dernière intervention
6
je croix qu'il y a une erreure car l'instruction ne fonctionne pas bien