Compter les cellules d'une certaines couleur avec mise en forme
Maxime39
Messages postés
2
Statut
Membre
-
Maxime39 Messages postés 2 Statut Membre -
Maxime39 Messages postés 2 Statut Membre -
Bonjour,
Bonjour,
Je souhaiterai pouvoir dénombrer les cellules d'une couleur donnée, dans un tableau excel,
cette couleur étant dépendante d'une mise en forme conditionnelle.
J'ai réalisé une macro :
Function CompteCouleurFondRef(champ As Range, couleurFond As Range)
Application.Volatile
Dim c, temp
temp = 0
For Each c In champ
If c.Interior.ColorIndex = couleurFond.Interior.ColorIndex Then
temp = temp + 1
End If
Next c
CompteCouleurFondRef = temp
End Function
Elle fonctionne, mais seulement sur les couleur mise manuellement. le format sous mise en forme conditionnel n'est pas pris en compte :(
Merci d'avance
Maxime
Bonjour,
Je souhaiterai pouvoir dénombrer les cellules d'une couleur donnée, dans un tableau excel,
cette couleur étant dépendante d'une mise en forme conditionnelle.
J'ai réalisé une macro :
Function CompteCouleurFondRef(champ As Range, couleurFond As Range)
Application.Volatile
Dim c, temp
temp = 0
For Each c In champ
If c.Interior.ColorIndex = couleurFond.Interior.ColorIndex Then
temp = temp + 1
End If
Next c
CompteCouleurFondRef = temp
End Function
Elle fonctionne, mais seulement sur les couleur mise manuellement. le format sous mise en forme conditionnel n'est pas pris en compte :(
Merci d'avance
Maxime
2 réponses
-
Bonsoir Maxime39,
Une façon de faire est de reprendre les critères qui font la mise en forme des cellules ..
Edit:
.. avec un NB.SI associé -
Bien vu ! Merci !
J'étais partis là dessus, mais je pensai qu'une macro serai mieux.
Si quelqu'un en connais une, je suis preneur. Même si celà fonctionne avec un NB.SI et une SOMMEPROD
Maxime
