Macro ou calcul?
Résolu
Cary
-
Cary -
Cary -
Bonjour,
https://www.cjoint.com/?lsnm13Unig
Est-ce possible de compter le nombre de boule verte, le nombre de boule jaune...????
https://www.cjoint.com/?lsnm13Unig
Est-ce possible de compter le nombre de boule verte, le nombre de boule jaune...????
A voir également:
- Macro ou calcul?
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Calcul km marche à pied gratuit - Télécharger - Sport
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Calcul charpente bois gratuit - Télécharger - Architecture & Déco
4 réponses
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
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
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
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
:-(