Textbox en fonction d'une combobox

[Mickaël]

Bonjour a tous

Voila je debute dans la prog VBA pour Excel et j'aurai besoin de votre aide.
J'ai un tableau avec plusieurs colonnes, dans une userform j'ai relié une combobox à la 1er colonne pour selectionner mes données.
Je voudrais savoir comment afficher dans une textbox les données de la colonne numero 2 en fonction de la selection sur la combobox.
Ex Combobox = colonne 1 ligne 30
Textbox = Colonne 2 ligne 30

Merci pour le coup de main

A+

 

[@+Thierry]

Salut Mickaël et le Forum,

Tu ne dis pas hélas comment tu as "relié" ta ComboBox à ta feuille...
Il y a plusieurs méthode...

...Et c'est en fonction de cette méthode que tu écriras le code pour alimenter une ou des TextBox destinées à être alimentée de données provenant de (des) colonne(s) adjacente(s) sur la même ligne...

Comme tu as bien fait de précisder que tu débutes, on va partir sur un exemple tout simple sur une alimentation de la ComboBox par la méthode RowSource...

Un UserForm
Une ComboBox
Une TextBox

Des données en colonnes A2:B11 d'une feuill "Sheet1".......

Voici un code Basic :
Private Sub UserForm_Initialize()
ComboBox1.RowSource = "Sheet1!A2:A11"
End Sub

Private Sub ComboBox1_Change()
Dim i As Integer
i = ComboBox1.ListIndex + 2
TextBox1 = Sheets("Sheet1").Range("B" & i)
End Sub


Voilà c'est tout....

Maintenant la Méthode d'alimentation de la ComboBox par AddItem, ou d'autres (List) peuvent nécessiter de s'y prendre tout à fait autrement...

Bonne Soirée
@+Thierry

 

[Mickaël]

Merci c'est exelent.
Peut etre aurais-je du utiliser une autre methode?
Si tu a des tyaux ce serai simpas.

MERCI MERCI.

A+