Formule pour compter les cellules colorées

Je voudrais réaliser un tableau synoptique d'activité Quelqu'un pourrait me dire si il existe une formule pour compter dans une ligne ou dans une colonne des cellules colorées (non blanches) et indiquer la valeur obtenue dans une cellule quelconque ?

Exemple : si je place en cellule B3 cette formule pour qu'elle m'indique le nombre de cellules colorées avec la commande <Format - Cellules - Motif - Ombrage de cellule>, dans la plage de cellules B4:B55.

Merci de vos réponses

Bonsoir,

Gilbert La Porte : Tu as raison, il faut voir la vie en couleurs alors voici quelques bons fils ressortis du Forum, très divers, à suivre qui pourront t'aider dans ta quête et peut-être plus.....(macro macro function format conditionnel)


Compter les couleurs I



Compter les couleurs II



La Couleur des Cellules


La Somme des Couleurs


Si tu rencontres des difficultés, n'hésite pas....

Celeda

Sub NombredeCellCouleur()
coul = 3 'rouge
total = 0
Range (A2100).select
For Each Cellule In Selection
If Cellule.Interior.ColorIndex = coul Then total = total + 1
Next
MsgBox "Il y a " & total & " Cellules " coul
Range("A1") = total
End Sub

cordialement