RechercheV en VBA

Bonjour,

J'aimerai sur une feuille excel récupérer les valeurs d'autres feuilles situées dans le même classeur. Ces valeurs sont récupérées à partir d'un identifiant sur la feuille principale.

Je m'explique :
=> Sur la feuille 1, j'ai en colonne A :
1
2
3...
En colonne B, j'aimerai récupérer la valeur qui correspond à la clef 1, 2, 3 sur une autre feuille dont le nom est constitué dynamiquement.

=> Sur la feuille 2, j'ai un tableau de deux colonnes en A, B :
1 ; Mavaleur1
2 ; Mavaleur2

=> Je peux avoir n feuilles où on va récupérer les valeurs stockées sur la feuille 1.

J'ai essaye d'utiliser RechercheV, mais cette fonction ne permet pas de passer le nom de la feuille dynamiquement, il doit etre fixe. J'ai donc eu l'idée de passer par une macro :

Code:

---

1 2 3 4 5 6

Function GetValue(ValueToFind As String, WorksheetName As String) As String   GetValue = WorksheetFunction.VLookup(ValueToFind, Worksheets(WorksheetName).Columns("A:B"), 2, False)   End Function

---

Elle prend un paramètre la clef à trouver (1,2...) et le nom de la feuille en question.. Le problème c'est que ma fonction ne marche pas : j'ai #VALEUR! comme résultat. La fonction recherche dans la feuille WorksheetName dans la plage de valeur A:B. Je ne suis pas sur de la syntaxe.

Qu'est ce qui ne fonctionne pas dans ma macro?

Merci par avance pour votre aide.

bonjour,

à première vue j'ai l'impression que tu mélange classeur et feuille dans ton descriptif

WorkSheet => feuille
WorkBook => Classeur

Essaie avec ça:

Code:

---

1 2 3

Public Function GetValue(ValueToFind As Variant, WorksheetName As String) As Variant GetValue = Application.WorksheetFunction.VLookup(ValueToFind, Sheets(WorksheetName).Columns("A:B"), 2, False) End Function

---

Citation:

---

Envoyé par bbil

bonjour,

à première vue j'ai l'impression que tu mélange classeur et feuille dans ton descriptif

WorkSheet => feuille
WorkBook => Classeur

---

Oui, j'ai modifié merci.

Merci vcottineau, ca fonctionne :)