Bonjour à tous,
Je suis nouveau sur ce forum et dans le monde VBA aussi...


Je cherche à utiliser la fonction VLookup dans une macro...

J'utilise le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub CommandButton1_Click()
 
If TextBox1 = "" Then
    MsgBox "Saisie obligatoire", vbCritical
    Exit Sub
End If
 
Dim R As Variant
R = Application.VLookup(ValeurRecherchée, Sheets("Feuil2").Range("A1:B8"), 2, False)
If IsError(R) Then
    MsgBox "Valeur inexistante"
Else
    MsgBox R
End If
 
End Sub
Le code fonctionne mais je souhaite à la place de ValeurCherchée, qu'il recherche plutôt la valeur obtenue via une textbox saisie dans un formulaire...

Pour plus d'info j'ai joint un fichier excel : Fonction RechercheV (Vlookup) dans une macro.xlsm

Si quelqu'un a des suggestions, j'en serais très reconnaissant. :-)

Par avance merci !

Bien cordialement,

Emeric