VLookUp dans Userform

Bonjour à tous!

J'aimerais créer un code me permettant de remplir mes textbox par une rechercheV de la textbox "DIN" dans ma base de données.

Merci de votre aide!

J'ai joint mon fichier Excel pour que vous compreniez mieux!

Ex: J'écris un DIN dans la textbox "DIN" et je clique sur un bouton "Rechercher" pour remplir les autres textbox de mon Userform!

Bonjour,

Macro affectée au bouton "Rechercher_DIN par exemple

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Private Sub Rechercher_DIN_Click() DIN = txtDin Set d = Sheets("Listing").Columns(2).Find(DIN) If Not d Is Nothing Then txtOG = Cells(d.Row, "A") txtMed = Cells(d.Row, "C") txtNomFab = Cells(d.Row, "D") txtNomCom = Cells(d.Row, "E") txtForme = Cells(d.Row, "F") txtForce = Cells(d.Row, "G") txtFabricant = Cells(d.Row, "H") End If End Sub

---

Cdlt

Bonjour, juste une proposition. 8O
Pourquoi ne pas remplacer le TextBox "DIN" par un bouton de commande avec caption"DIN" qui remplirait la même fonction,sans risque d'erreurs de frappe et qui serait plus confortable pour l'utiisateur.:)
Cordialement 8-)