XL 2016 Trouver colonne d'une valeur minimum

=INDEX(B$1:D$1;EQUIV(MIN(B2:D2);B2:D2;0))

=INDEX($1:$1;PETITE.VALEUR(SI(B2:D2=MIN(B2:D2);COLONNE(B2:D2));1))&SIERREUR(", "&INDEX($1:$1;PETITE.VALEUR(SI(B2:D2=MIN(B2:D2);COLONNE(B2:D2));2));"")&SIERREUR(", "&INDEX($1:$1;PETITE.VALEUR(SI(B2:D2=MIN(B2:D2);COLONNE(B2:D2));3));"")

Function Elimine(joueurs As Range, valeurs As Range, sep As String) As String
Dim mini, i, a(), n
mini = Application.Min(valeurs)
For i = 1 To valeurs.Count
    If valeurs(i) = mini Then
        ReDim Preserve a(n) 'base 0
        a(n) = joueurs(i)
        n = n + 1
    End If
Next
If n Then Elimine = Join(a, sep)
End Function

=Elimine(B$1:D$1;B2:D2;", ")