Remplir une textbox en fonction du contenu d'une combobox
Bonsoir à tous,
je sollicite votre aide afin de remplir une textbox à partir d'une combobox.
J'ai crée une feuille données avec 2 tableaux: 1 pour les clubs et 1 pour les Dirclubs et un userform.
Je voudrai que lorsque mon club est choisi via ma combobox, le dirclub soit toujours le même cad celui qui figure sur la meme
ligne dans la colonne suivante
J'ai fait plusieurs essais, notamment avec le contenu des cellules entre "" et puis avec l'adresse des cellule,
mais rien ne se passe même pas un bogue!.
Auriez-vous une idée?
je joins un fichier.
Merci d'avance ,
Siga
bonjour
déjà tu enlève le RowSource
et Voire le code
<code basic>
Private Sub UserForm_Initialize()
Set Sh = Sheets("données")
ComboBox1.List = Sh.Range("A2:B" & Sh.Range("A" & Rows.Count).End(xlUp).Row).Value
End Sub
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = -1 Then Exit Sub
TextBox1.Value = ComboBox1.Column(1)
End Sub
[/code]
A+
Maurice
Bonsoir,
Je vais tester ça demain...et vous tiens au courant,
Merci infiniment Maurice, à +
Bonjour à tous,
un grand MERCI @ Archer aka Maurice, cela fonctionne très bien
Bon weekend,
Siga