Tout est dans le fichier ci-joint.
J'explique rapidement mon probleme:
Je souhaite qu un textbox2 se remplisse automatiquement en fonction de ce qui est dans un textbox1 (info du textbox1 qui provient d'une base de donnees dans excel. tout fonctionne, sauf quand je souhaite rentrer en textbox1 autre chose que ce qui est dans ma base de donnee excel.
Tout est clair dans le peit exemple ci-joint je pense.
Private Sub TextBox1_Change()
Dim lig As Variant
TextBox2 = ""
lig = Application.Match(TextBox1, [essai].Columns(1), 0)
If IsNumeric(lig) Then TextBox2 = [essai].Cells(lig, 2)
End Sub
Private Sub TextBox1_Change()
Dim v As Variant
TextBox2 = ""
v = Application.VLookup(TextBox1, [essai], 2, 0)
If Not IsError(v) Then TextBox2 = v
End Sub
Mais la méthode du post #2 a un avantage : elle permet d'accéder à la cellule de destination.
Et donc d'afficher éventuellement les valeurs d'erreur et/ou les formules.