Comptage de cellule coloré sur Excel

Résolu/Fermé
Dyarguy Messages postés 31 Date d'inscription jeudi 26 mars 2015 Statut Membre Dernière intervention 13 août 2019 - 27 janv. 2016 à 08:54
Dyarguy Messages postés 31 Date d'inscription jeudi 26 mars 2015 Statut Membre Dernière intervention 13 août 2019 - 28 janv. 2016 à 07:56
Bonjour,

Je souhaiterai compté un nombre de cellule colorié en jaune (par exemple) dans une colonne.

Cela me permettrai de suivre un avancement.

Voici un exemple:
https://www.cjoint.com/c/FABh0NL6uyG

Pouvez vous m'aider?

Merci

1 réponse

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
Modifié par michel_m le 27/01/2016 à 10:00
Bonjour
avec une Fonction personnalisée
Option Explicit
'-------------
Function compter_les_couleurs(Couleur As Integer) As Byte
Dim Nbre As Byte, lig As Byte
For lig = 7 To 50
If Cells(lig, "J").Interior.ColorIndex = Couleur Then Nbre = Nbre + 1
Next
compter_les_couleurs = Nbre
End Function


pour le jaune: 6

compter_les_couleurs(6)
dans la cellule où tu veux le résultat

La maquette
http://www.cjoint.com/c/FABi7N2NhtT

 Michel
0
Dyarguy Messages postés 31 Date d'inscription jeudi 26 mars 2015 Statut Membre Dernière intervention 13 août 2019
28 janv. 2016 à 07:56
Merci cela fonctionne très bien
0