Bonsoir bonsoir,

Pour mon inventaire, j ai un soucis.
J'aimerai afficher les info dans une textbox par rapport a une liste dans une combobox cellule de la meme ligne.
Info de la combobox en collone B et l'info a trouver dans la textbox en A.

J'ai test avec ca mais rien de ne fonction il me met que j'ai une erreur de compilation sub ou fonction non définie

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub selection_1_Change()
 
****With ThisWorkbook.Sheets("Inventaire")
********For Each Nom In .Range("B2:B" & .[B1048576].End(xlUp).Row)
************If CStr(Nom) = CStr(Me.selection_1.Value) Then
****************Me.refmouv_1.Value = .Cells(Nom.Row, 0)
************End If
********Next
****End With
 
End Sub
Désole mais suis vraiment pas doué en VBA

Merci d'avance pour votre aide