Bonsoir H2s04,
as tu un fichier exemple ...par exemple !
Pour ma part je viens de tenter cela !
la seul chose que je n'arrive pas est de mettre a "blanc" le combobox qui n'est pas utilisé...
'pour charger la liste deroulante
Private Sub UserForm_Initialize()
Set Sh = Feuil1
ComboBox1.List = Sh.Range("A5:N" & Sh.Range("A" & Rows.Count).End(xlUp).Row).Value
Set Sh = Feuil1
ComboBox2.List = Sh.Range("C5:N" & Sh.Range("A" & Rows.Count).End(xlUp).Row).Value
End Sub
'affice les textbox dans le formulaire combobox1
Private Sub ComboBox1_Change()
no_ligne = Me.ComboBox1.ListIndex + 5
TextBox1.Value = Cells(no_ligne, 1)
TextBox2.Value = Cells(no_ligne, 2)
'affice les textbox dans le formulaire combobox2
Private Sub ComboBox2_Change()
no_ligne = Me.ComboBox2.ListIndex + 5
TextBox1.Value = Cells(no_ligne, 1)
TextBox2.Value = Cells(no_ligne, 2)
Merci a ceux qui pourront le bonifier !