Bonjour à tous,

Voilà je souhaite charger un combobox avec des noms de variables pour que suivant le choix de l'utilisateur, un textbox affiche la valeur de cette variable.

Mon code (exemple simplifié):

Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub UserForm_Initialize()

Dim Variable1 As String
Dim Variable2 As String
Dim Variable3 As String
Variable1 = "Texte à afficher n°1"
Variable2 = "Texte à afficher n°2"
Variable3 = "Texte à afficher n°3"

    With ComboBox1
    .AddItem "Variable1"
    .AddItem "Variable2"
    .AddItem "Variable3"
    End With

End Sub

Sub ComboBox1_Change()
TextBox1.Value = ComboBox1.Value
End Sub

Bien évidemment c'est la ligne 19 en bleu qui doit être remplacée afin que ma textbox n'affiche pas "Variable1" mais "Texte à afficher n°1" (pour le choix 1)
Après plusieurs tentatives je sèche toujours

Merci pour votre aide !