Recherche par VBA

Bonjour à tous,

j’espère que vous allez bien, je me permet de venir chercher bonheur auprès de votre fibre cérébral .

Je bute sur mon code VBA j'ai besoin dans un userform de faire apparaître un nom de produit en fonction d'un code article sur une autre feuille mais a chaque fois je m'heurte au meme problème une erreur sub function et je n'arrive pas a régler le problème pouririez vous m'aider ?

Ici on rentre le code produit et en validant ca affiche le nom du code produit de la page paramètres dans le tableau correspondant

annotation 2019 06 26 103655 annotation 2019 06 26 103803

Merci d'avance pour votre aide.

Bonjour Toytoy27, le forum,

Un fichier aurait été le bienvenu....

Un essai avec rechercheV.....

6classeur1.xlsm (22.83 Ko)

Cordialement,

Merci pour ton retour xorsankukai

Je ne peut malheureusement fournir le fichier mais je vais essayer d'en faire un qui correspondrait a mes attentes

Du coup je l'ai dépouiller de a à z en laissant l'essentiel de selon j'ai besoin merci d'avance

5artiq.rar (782.54 Ko)

Re,

Merci pour ton fichier,

A tester....ça fonctionne chez moi,

Private Sub valide_Click()

 Dim dl As Long, resultat As String, plage As Range, a As Long
  With Sheets("Paramètres")
        dl = .Range("A" & Rows.Count).End(xlUp).Row
 Set plage = .Range("A2:B" & dl)
 On Error GoTo 1
         a = TextBoxproduit.Value

  resultat = Application.VLookup(a, plage, 2, False)
  End With

nomproduit = resultat
1
         a = Empty
End Sub
Private Sub TextBoxproduit_Change()
 nomproduit = Empty
End Sub
6artiq.zip (713.85 Ko)

Cordialement,

Rechercher des sujets similaires à "recherche vba"