Bonjour à tous,

En colonne A, j'aimerais compter les cellules d'une même couleur (ici jaune=6), dans des sous-ensembles prédéfinies en utilisant la fonction SOMMEPROD en VBA, pour éviter les boucles imbriquées :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cells(i,2).Formula = "=SUMPRODUCT((" & Plage & ">=" & Tmp(0) & ")*(" & Plage & "<=" & Tmp(1) & ")*(" & Plage.Interior.ColorIndex & "=6)*1)"
Plage : A2:A2000
tmp(0) : valeur Min du sous-ensemble
tmp(1) : valeur Max du sous-ensemble

Merci d'avance.