Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme?
Je m'explique: dans une même feuille, je souhaite faire en
-A1 la somme de toutes les cellules bleues,
-A2 la somme des couleur jaune,
-A3 celle de couleur verte,
-etc jusqu'à 10 couleurs.
Avec et sans macro si possible.
Merci pour le coup de pouce.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. La question revient très souvent. Fais une recherche Google groupes avec les mots clés : excel somme couleur. Cordialement. Daniel "Jean-Paul Brine" a écrit dans le message de news:
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme? Je m'explique: dans une même feuille, je souhaite faire en -A1 la somme de toutes les cellules bleues, -A2 la somme des couleur jaune, -A3 celle de couleur verte, -etc jusqu'à 10 couleurs. Avec et sans macro si possible. Merci pour le coup de pouce.
JP
Bonjour.
La question revient très souvent. Fais une recherche Google groupes avec les
mots clés : excel somme couleur.
Cordialement.
Daniel
"Jean-Paul Brine" <jeanpaulbrine@hotmail.com> a écrit dans le message de
news: uXzGfmyzGHA.4796@TK2MSFTNGP06.phx.gbl...
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en
forme?
Je m'explique: dans une même feuille, je souhaite faire en
-A1 la somme de toutes les cellules bleues,
-A2 la somme des couleur jaune,
-A3 celle de couleur verte,
-etc jusqu'à 10 couleurs.
Avec et sans macro si possible.
Merci pour le coup de pouce.
Bonjour. La question revient très souvent. Fais une recherche Google groupes avec les mots clés : excel somme couleur. Cordialement. Daniel "Jean-Paul Brine" a écrit dans le message de news:
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme? Je m'explique: dans une même feuille, je souhaite faire en -A1 la somme de toutes les cellules bleues, -A2 la somme des couleur jaune, -A3 celle de couleur verte, -etc jusqu'à 10 couleurs. Avec et sans macro si possible. Merci pour le coup de pouce.
JP
anonymousA
Bonjour,
sans macro c'est impossible.
Si par couleur, tu entends couleur de remplissage, ce qui suit peut faire ce que tu souhaites. A mettre dans un module standard
Function titicoul(rng As Range, coul As String)
Dim transf As Integer
Application.Volatile
Select Case coul Case "V" transf = 4 Case "B" transf = 32 Case "J" transf = 6 Case Else Exit Function End Select
For Each cell In rng If cell.Interior.ColorIndex = transf Then titicoul = titicoul + 1 Next
End Function
Ensuite dans ta feuille, tu n'auras plus qu'à écrire la formule p.e, =titicoul(A1:A56;"B") et tu obtiendras le nombre de cellules bleues en supposant bien sur que le bleu que tu as utilisé correspond bien à la référence 32 de la fonction
De +, je te précise que s'il s'agit de compter des couleurs issues d'une réponse de Mise en Forme Conditionnelle ou d'un Format Personnalisé , ce qui est écrit ci-dessus ne fonctionnera pas.
A+
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme? Je m'explique: dans une même feuille, je souhaite faire en -A1 la somme de toutes les cellules bleues, -A2 la somme des couleur jaune, -A3 celle de couleur verte, -etc jusqu'à 10 couleurs. Avec et sans macro si possible. Merci pour le coup de pouce.
JP
Bonjour,
sans macro c'est impossible.
Si par couleur, tu entends couleur de remplissage, ce qui suit peut
faire ce que tu souhaites. A mettre dans un module standard
Function titicoul(rng As Range, coul As String)
Dim transf As Integer
Application.Volatile
Select Case coul
Case "V"
transf = 4
Case "B"
transf = 32
Case "J"
transf = 6
Case Else
Exit Function
End Select
For Each cell In rng
If cell.Interior.ColorIndex = transf Then titicoul = titicoul + 1
Next
End Function
Ensuite dans ta feuille, tu n'auras plus qu'à écrire la formule p.e,
=titicoul(A1:A56;"B") et tu obtiendras le nombre de cellules bleues en
supposant bien sur que le bleu que tu as utilisé correspond bien à la
référence 32 de la fonction
De +, je te précise que s'il s'agit de compter des couleurs issues d'une
réponse de Mise en Forme Conditionnelle ou d'un Format Personnalisé , ce
qui est écrit ci-dessus ne fonctionnera pas.
A+
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme?
Je m'explique: dans une même feuille, je souhaite faire en
-A1 la somme de toutes les cellules bleues,
-A2 la somme des couleur jaune,
-A3 celle de couleur verte,
-etc jusqu'à 10 couleurs.
Avec et sans macro si possible.
Merci pour le coup de pouce.
Si par couleur, tu entends couleur de remplissage, ce qui suit peut faire ce que tu souhaites. A mettre dans un module standard
Function titicoul(rng As Range, coul As String)
Dim transf As Integer
Application.Volatile
Select Case coul Case "V" transf = 4 Case "B" transf = 32 Case "J" transf = 6 Case Else Exit Function End Select
For Each cell In rng If cell.Interior.ColorIndex = transf Then titicoul = titicoul + 1 Next
End Function
Ensuite dans ta feuille, tu n'auras plus qu'à écrire la formule p.e, =titicoul(A1:A56;"B") et tu obtiendras le nombre de cellules bleues en supposant bien sur que le bleu que tu as utilisé correspond bien à la référence 32 de la fonction
De +, je te précise que s'il s'agit de compter des couleurs issues d'une réponse de Mise en Forme Conditionnelle ou d'un Format Personnalisé , ce qui est écrit ci-dessus ne fonctionnera pas.
A+
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme? Je m'explique: dans une même feuille, je souhaite faire en -A1 la somme de toutes les cellules bleues, -A2 la somme des couleur jaune, -A3 celle de couleur verte, -etc jusqu'à 10 couleurs. Avec et sans macro si possible. Merci pour le coup de pouce.
JP
lSteph
Bonjour, Outre les pistes fournies par Daniel...
(amha)
à noter que si c'est assez joli et amusant d'utiliser ainsi des couleurs le résultat obtenu par une fonction faisant la somme des couleurs (application.volatile n'y changera pas grand chose) se heurte à une difficulté majeure:
-Par suite, un changement de couleur ne provoque pas un recalcul! Il faut relancer soit la macro soit forcer un recalcul par ailleurs.
On peut toujours envisager de mettre en place une procèdure On time juste pour recalculer toute les n secondes. Tout cela devient considérablement lourdingue.
En conclusion, si on aime les couleurs et que l'on veut un tableur performant, il est préférable d'envisager les critères de calcul par des formule basées sur des valeurs plutôt que des formats. Cela n'empêche pas d'y faire apparaître des couleurs qui ciblent des cellules voir Format Mise en forme conditionnelle.
Cordialement.
lSteph
"Jean-Paul Brine" a écrit dans le message de news:
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme? Je m'explique: dans une même feuille, je souhaite faire en -A1 la somme de toutes les cellules bleues, -A2 la somme des couleur jaune, -A3 celle de couleur verte, -etc jusqu'à 10 couleurs. Avec et sans macro si possible. Merci pour le coup de pouce.
JP
Bonjour,
Outre les pistes fournies par Daniel...
(amha)
à noter que si c'est assez joli et amusant d'utiliser ainsi des couleurs
le résultat obtenu par une fonction faisant la somme des couleurs
(application.volatile n'y changera pas grand chose)
se heurte à une difficulté majeure:
-Par suite, un changement de couleur ne provoque pas un recalcul!
Il faut relancer soit la macro soit forcer un recalcul par ailleurs.
On peut toujours envisager de mettre en place une procèdure On time
juste pour recalculer toute les n secondes.
Tout cela devient considérablement lourdingue.
En conclusion, si on aime les couleurs et que l'on veut un tableur
performant,
il est préférable d'envisager les critères de calcul par des formule basées
sur
des valeurs plutôt que des formats.
Cela n'empêche pas d'y faire apparaître des couleurs qui ciblent des
cellules
voir Format Mise en forme conditionnelle.
Cordialement.
lSteph
"Jean-Paul Brine" <jeanpaulbrine@hotmail.com> a écrit dans le message de
news: uXzGfmyzGHA.4796@TK2MSFTNGP06.phx.gbl...
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en
forme?
Je m'explique: dans une même feuille, je souhaite faire en
-A1 la somme de toutes les cellules bleues,
-A2 la somme des couleur jaune,
-A3 celle de couleur verte,
-etc jusqu'à 10 couleurs.
Avec et sans macro si possible.
Merci pour le coup de pouce.
à noter que si c'est assez joli et amusant d'utiliser ainsi des couleurs le résultat obtenu par une fonction faisant la somme des couleurs (application.volatile n'y changera pas grand chose) se heurte à une difficulté majeure:
-Par suite, un changement de couleur ne provoque pas un recalcul! Il faut relancer soit la macro soit forcer un recalcul par ailleurs.
On peut toujours envisager de mettre en place une procèdure On time juste pour recalculer toute les n secondes. Tout cela devient considérablement lourdingue.
En conclusion, si on aime les couleurs et que l'on veut un tableur performant, il est préférable d'envisager les critères de calcul par des formule basées sur des valeurs plutôt que des formats. Cela n'empêche pas d'y faire apparaître des couleurs qui ciblent des cellules voir Format Mise en forme conditionnelle.
Cordialement.
lSteph
"Jean-Paul Brine" a écrit dans le message de news:
Bonjour,
Quelqu'un peut-il m'aider à totaliser les cellules selon leur mise en forme? Je m'explique: dans une même feuille, je souhaite faire en -A1 la somme de toutes les cellules bleues, -A2 la somme des couleur jaune, -A3 celle de couleur verte, -etc jusqu'à 10 couleurs. Avec et sans macro si possible. Merci pour le coup de pouce.
