Compter les cases de couleur
Résolu
marychamp
Messages postés
17
Statut
Membre
-
marychamp Messages postés 17 Statut Membre -
marychamp Messages postés 17 Statut Membre -
Bonjour,
J'aimerais une formule qui m'indique ...
Par exemple: Case B2 = Inscrire (compter) le nombre de case jaune dans la colonne A en entier...
Est-ce que sa se fait ?
Merci
J'aimerais une formule qui m'indique ...
Par exemple: Case B2 = Inscrire (compter) le nombre de case jaune dans la colonne A en entier...
Est-ce que sa se fait ?
Merci
9 réponses
-
Bonjour
La couleur a t'elle été mise "à la main" ou bien provient elle d'une Mise en forme conditionnelle?
Cdlmnt -
-
-
Salut le Forum
Un lien : https://forums.commentcamarche.net/forum/affich-20670223-nombre-de-cellules-selon-leur-couleurs
Mytå -
-
-
Avec NB.SI tu peux dénombrer les cellules qui vérifient la même condition
Un exemple
https://www.cjoint.com/?3HCrEqgSAPu
Cdlmnt -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
-
Bonjour Mita,
Je ne comprends pas trop ton lien...
Je crois que je n'ai pas la bonne formule, je m'y prends mal.
Mais moi je veux compter le nombre de case jaune (le fond de la case)
=NbreCellulesCouleur(A8:A437;6)
?? -
Et Pour des couleurs mises "à la main" il faudra passer par une macro
https://www.cjoint.com/?3HCr1Ldz5wX
Cdlmnt-
Merci beaucoup pour ton aide ... mais malgré tout je n'y arrive pas ... :(
Je savais meme pas que je pouvais aller voir le module lol
Ensuite ... je dois copier quoi et le mettre dans ma formule ...?
Public Function NbCelCoul(plage As Range, cel As Range) As Long
Dim coul As Long, nbc As Long, c As Range
Application.Volatile
nbc = 0
coul = cel.Interior.ColorIndex
For Each c In plage
If c.Interior.ColorIndex = coul Then nbc = nbc + 1
Next c
NbCelCoul = nbc
End Function
-
-
Une question . As tu fait fonctionner la macro dans mon exemple
1. Comme précisé dans l'exemple, la plage à traiter ne doit pas faire l'objet d'une MFC
2. Alt-F11 pour acceder à l'éditeur vba puis insertion/module pour créer le "Module 1"
3. Copier l'intégralité du code dans ce Module 1
4. Revenir dans la feuille Excel
5. La fonction NbCelCoul s'utilisera alors comme une fonction excel ordinaire dans la feuille
Dans mon exemple : A17=nbcelcoul(A2:A12;A5)
- la plage à traiter est A2:A12
- la couleur à dénombrer est celle de la cellule A5
- compte le nombre de cellules le la plage A2:A12 qui ont la couleur de fond de A5
C'est tout
RQ. Si tu es sous excel >=2007 tu dois enregistrer ton fichier avec l'extension .xlsm (pour accepter les macros) -
Merci énormément pour ta patience :)
Merci beaucoup de ton aide :)
