Textbox en fonction d'une combobox

  • Initiateur de la discussion Mickaël
  • Date de début
M

Mickaël

Guest
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

Guest
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
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 886
Membres
101 830
dernier inscrit
sonia poulaert