bonsoir,
une solution avec une fonction personnalisée
utilisation
=nbrcelcoul(plage;reference)
compter le nombre de cellule ayant la même couleur que A1 dans la plage A1:C100
=nbrcelcoul(A1:C100;A1)
Function nbrcelcoul(a As Range, reference As Range)
For Each c In a
If c.Interior.Color = reference.Interior.Color Then nbrcelcoul = nbrcelcoul + 1
Next
End Function