Bonjour Forum et tous ceux qui ont participé à cette discussion
Tu peux voir le code en tapant Alt-F11 dans visual basic
Voici le code pour la fonction que tu places dans 1 module
Function Recherches_Multiples(ValeurRecherchee As Range, TableDeRecherche As Range, NumColonne As Integer, Separator As String) As Variant
Dim NbLignes As Integer
NbLignes = TableDeRecherche.Rows.Count
Dim CompteurValeursTrouvees As Integer
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
Ensuite dans ta liste de fonctions devrait apparaître cette fonction comme toutes les autres fonctions (RECHERCHEV, RECHERCHEH,NB.SI...) ensuite tu as juste à utiliser comme les autres fonctions normalement et recopier comme bon te semble.
Bonne journée