Fonction recherche multiple

bonjour a tous

j'ai cette fonction qui me permet d'effectuer des recherches V en me renvoyant plusieurs résultats.

ca fonctionne très bien .

en revanche si ma table matrice est sur une autre feuille (du même classeur) ca ne fonctionne plus.

pouvez m aider svp ...?

Function Recherches_Multiples(ValeurRecherchee As Range, TableDeRecherche As Range, NumColonne As Long, Separator As String) As Variant
Dim NbLignes As Long
NbLignes = TableDeRecherche.Rows.Count
Dim CompteurValeursTrouvees As Long
CompteurValeursTrouvees = 0

For i = 1 To NbLignes
If TableDeRecherche(i, 1).Value = ValeurRecherchee.Value Then
CompteurValeursTrouvees = CompteurValeursTrouvees + 1
If CompteurValeursTrouvees > 1 Then
Recherches_Multiples = Recherches_Multiples & Separator & TableDeRecherche(i, NumColonne).Value
Else
Recherches_Multiples = TableDeRecherche(i, NumColonne).Value
End If
End If
Next i
End Function

Bonjour à tous !

slygan, peut-être en modifiant cette ligne de code

If TableDeRecherche(i, 1).Value = ValeurRecherchee.Value Then

mais sans fichier exemple difficile à voir

Bonne journée !

le fichier pour exemple

Bonsoir à tous !

Slygan, peut-être comme ceci avec fonction et VBA...

Bonne soirée !

ta proposition semble intéressante mais trop éloignée de mon besoin.

pas grave, tu m'a donné une idée et du coup j'ai solutionné mon problème.

merci .