macro ou calcul? Résolu/Fermé

Question

Bonjour,

https://www.cjoint.com/?lsnm13Unig

Est-ce possible de compter le nombre de boule verte, le nombre de boule jaune...????

Farfadet88 · Answer

Bonjour,

Ton tableau n'est pas très clair, que veux tu faire exactement?

pijaku · Answer

Salut,
Effectivement, le tableau n'est pas clair. Je pense que la colonne A ne devrait pas être toute grise, mais contenir des cellules de couleur différentes.
Si tel est le cas, voici la démarche (trouvée ici dans le post de Rai)
Taper Alt + F11
Insertion / Modules
Copier / coller ce code :

Function SommeCouleur(Plage As Range, Optional couleur As Integer)
Application.Volatile
If couleur = 0 Then couleur = xlColorIndexNone
For Each c In Plage
If c.Interior.ColorIndex = couleur Then SommeCouleur = SommeCouleur + 1
Next c
End Function

Saisir dans la cellule ou l'on désire la somme des cellules colorées :
=SOMMECOULEUR(A1:A25;3)
A1:A25 étant la plage et 3 le code couleur
codes couleurs : 1=noir, 2=blanc (et non absence de couleur), 3=rouge, 4=vert, 5=bleu, 6=jaune, 7=rose, 8=bleu clair

JvDo · Answer

Bonsoir,

voilà une possibilité :
pour les rouges : =SOMMEPROD((ENT((3*$A$1:$A$25/MAX($A$1:$A$25)))=0)*1)
pour les oranges: =SOMMEPROD((ENT((3*$A$1:$A$25/MAX($A$1:$A$25)))=1)*1)
pour les pas mures : =SOMMEPROD((ENT((3*$A$1:$A$25/MAX($A$1:$A$25)))=2)*1)

ou encore :
=SOMMEPROD(($A$1:$A$25/MAX($A$1:$A$25)<1/3)*1)
=SOMMEPROD(($A$1:$A$25/MAX($A$1:$A$25)>=1/3)*($A$1:$A$25/MAX($A$1:$A$25)<=2/3)*1)
=SOMMEPROD(($A$1:$A$25/MAX($A$1:$A$25)>=2/3)*1)

ou encore :
=FREQUENCE($A$1:$A$25/MAX($A$1:$A$25);{0,33333333333333;0,6666666666666;1})
en validation matricielle (CTRL+MAJ+ENTER) sur une zone de 3 cellules genre F4:F6

cordialement

JvDo · Answer

Bonsoir,

en rajoutant ($A$1:$A$28>0) dans la formule ça doit marcher :
=SOMMEPROD(($A$1:$A$28>0)*($A$1:$A$28/MAX($A$1:$A$28)<1/3)*1)

cordialement

Macro ou calcul?

4 réponses

Discussions similaires