XL 2013 colonne de feuille en textbox d'après choix listbox

[eldinal]

j'aimerai savoir si y'a une possibilité de :

affiche la valeur d'une colonne A dans textbox1 en fonction de la valeur du listbox1 choisi dans colonne B

 

[Eric KERGRESSE]

Bonjour,

Exemple :

En admettant que votre Listbox contienne a minima les deux premières colonnes de votre tableau :

Private Sub List_Produits_Click()

Dim I As Long

    If List_Produits.ListCount > 0 Then
        For I = 0 To List_Produits.ListCount - 1
            If List_Produits.Selected(I) = True Then
               TextBox1 = List_Produits.List(I, 0)
               'Range("t_Produits").Rows(I + 1).Select
            End If
        Next I
   
     End If

End Sub