Autres Modif sur une macro... voir fichier ...

=SIERREUR(RECHERCHEV(E2;$A$1:$C$100;3;0);SIERREUR(RECHERCHEV(GAUCHE(E2;2);$A$1:$C$100;3;0);""))

=SIERREUR(RECHERCHEV(E2;$A$1:$C$100;3;0);SIERREUR(RECHERCHEV(GAUCHE(E2;2);$A$1:$C$100;3;0);SIERREUR(RECHERCHEV(GAUCHE(E2;3);$A$1:$C$100;3;0);"")))

Function Fct_TestOui(xVal)
    xPlage = Range("A2:A19")                                    'Plage Colonne A
    xPlageOui = Range("C2:C19")                                 'Plage Colonne C
    For F = 1 To UBound(xPlage)                                 'On parcours toute la plage
        If xPlageOui(F, 1) = "oui" Then                         'Si OUI dans colonne C
            If xVal Like "*" & xPlage(F, 1) & "*" Then          'Si correspondance
                Fct_TestOui = "OUI"                             'Alors OUI et on sort
                Exit For
            Else
                Fct_TestOui = ""                                'Sinon Vide
            End If
        End If
    Next F
End Function

=DECALER(Couleurs!$A$1;1;;NBVAL(Couleurs!$A:$A)-1;3)

=REPT("oui";ESTNUM(EQUIV("1oui";NB.SI(E2;"*"&INDEX(T;;1)&"*")&INDEX(T;;3);0)))

=REPT("oui";ESTNUM(EQUIV("1oui";SIGNE(CHERCHE(INDEX(T;;1);E2))&INDEX(T;;3);0)))