Discussion :

[babybell]

Amis du forum bonjour

Après de vaines recherches, je viens vous présenter mon problème.
J'ai dans un combobox 3 choix et j'aimerai que suivant le choix, s'inscrive automatiquement dans un textbox ou une listbox un texte défini par avance.
Une solution existe-t-elle ?
Merci de votre aide

[fring]

Bonjour,

Si ces contrôles sont sur un UserForm (ce que tu ne précises pas...), tu peux faire ceci :

Code à insérer dans le module du UserForm :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub ComboBox1_Change()
    Select Case Me.ComboBox1.ListIndex
        Case 0: Me.TextBox1 = "Choix 1"
        Case 1: Me.TextBox1 = "Choix 2"
        Case 2: Me.TextBox1 = "Choix 3"
    End Select
End Sub

[babybell]

Merci à toi fring.
Effectivement, et j'avais oublié de le préciser, ces contrôles sont sur un UserForm .

Cela fontionne très bien. Merci encore