Déterminer valeur textbox en fonction valeur combobox

Bonjour.

Dans mon userform il y a deux contrôles : un textbox (Textbox1) et un combobox (Combobox1).

Je Voudrais définir la valeur du textbox en fonction de ce que j’écris ou je choisis dans le combobox.

Par exemple si j’écris A dans le combobox, que je textbox devienne 25

Si j’écris A dans le combobox, que je textbox devienne 33

Si j’écris C dans le combobox, que je textbox devienne 32

Si j’écris D dans le combobox, que je textbox devienne 40

Si j’écris K dans le combobox, que je textbox devienne 70

Si j’écris M dans le combobox, que je textbox devienne 54

Si je saisie autre chose que rien ne se passe

Merci

par avance

Bonjour Sawtappo, le forum,

Je Voudrais définir la valeur du textbox en fonction de ce que j’écris ou je choisis dans le combobox.

Par exemple si j’écris A dans le combobox, que je textbox devienne 25

Si j’écris A dans le combobox, que je textbox devienne 33

....

Si je saisie autre chose que rien ne se passe

A tester...

Private Sub ComboBox1_Change()
 Select Case Me.ComboBox1.Value
  Case "A"
   Me.TextBox1.Value = 33
  Case "C"
   Me.TextBox1.Value = 32
  Case "D"
   Me.TextBox1.Value = 40
  Case "K"
   Me.TextBox1.Value = 70
  Case "M"
   Me.TextBox1.Value = 54
  Case Else
   Me.TextBox1.Value = ""
 End Select
End Sub

Du coup pour "A": 25 ou 33 ?

Cordialement,

Satisfait ! Merci grandement