Re @DMT,
Ça ne pouvait pas fonctionner, puisqu’il y manquait le code VBA essentiel pour ce genre de requête Excel.
Il s’agit d’un petit programme qui se trouve dans l’éditeur de macro VBA, pour y accéder, dans ta feuille Excel, tu tapes alt + F11 et tu y verras cette fonction programme, permettant de compter les couleurs dans Excel.
Option Explicit
Function couleur(range_data As Range, criteria As Range) As Long
Dim datax As Range
Dim xcolor As Long
xcolor = criteria.Interior.ColorIndex
For Each datax In range_data
If datax.Interior.ColorIndex = xcolor Then
couleur = couleur + 1
End If
Next datax
End Function
Comme je le disais plus haut, dans ta feuille il faut écrire par exemple:
=couleur(E2:E25;A1)

Ci joint un fichier Excel pour l’exemple.
DMT V1.xlsm (17,0 Ko)
Ça ne ferait pas avancer le schmilblick 
Cela te convient-il ?
Cordialement.