XL 2016 TextBox qui affiche selon un ComboBox

[Carlich]

Bonjour,

Dans le cadre de mon boulot j'essaye de réaliser un UserForm qui afficherait un temps que je désire mais je n'arrive pas a faire en sorte que quand on sélectionne une donnée dans le ComboBox ca l'affiche dans mon TextBox

Je vous joint le fichier si vous en avez besoin,
Merci a ceux qui prendront leur temps pour m'aider

Cordialement

 

[sylvanu]

Bonjour Carlich,
En PJ un essai. J'ai rectifié quelques erreurs dans le module UserForm_Initialize et j'ai rajouté le module :

Private Sub ComboBox1_Change()
    N = Application.Match(UserForm1.ComboBox1.Value, Sheets("Sheet1").Range("A:A"), 0)
    Valeur = Sheets("Sheet1").Cells(N, "B")
    UserForm1.TextBox1 = Valeur
End Sub

 

[Carlich]

Bonjour sylvanu,

Super merci ca marche niquel du coup si je voudrais refaire cette manip avec d'autre TextBox et ComboBox j'aurais juste a changer:

-La Range dans le ComboBox1_Change ?
-Les Range dans UserForm_Initialize ?
-Les .Cells aussi?

Merci de ta réponse rapide et de la solution!

 

[sylvanu]

-La Range dans le ComboBox1_Change ? OUI
-Les Range dans UserForm_Initialize ? Pour la partie TextBox, Oui.
-Les .Cells aussi? Oui.

Le principe sera le même quel que soit le nombre de textbox.

 

[Carlich]

D'accord merci tu m'aides beaucoup ca fais des heures je m'arrache les cheveux a chercher et toi tu trouves en quelque minute ahah