Je ne vois pas trop comment est utilisé la fonction VLookup (équivalent de RechercheV)
J'aimerai que cela se fasse en instantané, qu'une indication lié à une valeur s'affiche dans un label.
(J'y joint un fichier simple qui ilustre ma demande, mais merci de m'y répondre autre que en pièce jointe.)
Je suis désolé, mais encore faut-il comprendre la fonction RECHERCHEV !
Elle nécessite une référence, une table et un numéro de colonne, or avec une donnée unique....
Précisez votre question
A+
kjin
Oui,
désolée.
En cliquant sur le bouton "Recherche", en indiquant une lettre, qu'il y ai un critère lier à cette lettre (ex : colonne 3, feuil2) qui s'affiche juste à coté.
Je suis désolé, mais je ne comprends ni la question, ni le but
VLOOKUP n'est ni plus ni moins que la fonction native d'excel et requiert les mêmes paramètres en VBA soit
[valeur cherchée],
,[colonne],[valeur proche] et la colonne de recherche doit être située à droite de la colonne contenant la valeur cherchée
Avec le petit tableau du fichier exemple, si l'on cherche la cellule correspondant à "m" en colonne 3 du tableau
[A: D]
Code:
Dim x
With Sheets("Feuil2")
x = Application.VLookup("m", .[A:D], 2, 0)
End With
Merci pour la réponse, mais cela ne marche pas.
Le but est que lorsque que l'on rentre une valeur dans l'UserForm, il y ai une réponse instantané qui ce face.
Je vois bien que tu ne comprends pas la question, car la réponse n'a pas trop de correspondanse avec la question.
Reformulation de la question :
Lorsque l'on "Click" sur le bouton "Recherche", une fenêtre souvre. Dans cette fenêtre, en rentrant une lettre, il y a un numéro (par exemple) en réponse.
Si... j'ai bien compris (sans témérité kjin , essaie
Code:
Private Sub Label1_Click()
On Error Resume Next 'si le texte ne figure pas en colonne A de la Feuil2
Label1 = Feuil2.[A:A].Find(TextBox1)(1, 2) ', 2 pour la colonne 2, sinon 3 pour la colonne 3, 4 pour la colonne 4
End Sub