compte des couleur dans excel

[CED59]

bonjour j'ai fait un planning et je n'arrive pas a mettre les bonnes formules pour compter les couleurs dans les cases
ci joint une copi de mon fichier avec des bulle explicative de ce que je desir
merci

 

[roro69]

Re : compte des couleur dans excel

Bonjour
Tiens essaye cecci

 

[JCGL]

Re : compte des couleur dans excel

Bonjour à tous,

Ton fichier avec un fonction de Ti,

Option Explicit

Function Couleurs(Plage As Range, IndexCouleur As Integer) As Long 'Ti sur VeriTi
Dim Cel As Range
  For Each Cel In Plage.Cells
    If Cel.Interior.ColorIndex = IndexCouleur Then Couleurs = Couleurs + 1
  Next Cel
End Function

A+

Edition : Salut Roro ;-)

 

[Cousinhub]

Re : compte des couleur dans excel

Bonjour,
en utilisant une fonction personnalisée de JB (Boisgontier)
regarde le fichier joint, le calcul se fait dès que tu changes de sélection sur ta feuille ou à l'appui sur F9 (Calculer)

Edit : Salut Jc
presque la même fonction, la différence, la couleur comptabilisée est la couleur de la cellule appelante pour moi, le chiffre de la couleur pour toi....
Bonne soirée

 

[roro69]

Re : compte des couleur dans excel

Bonsoir jcgl
Super la fontion c'est bien pratique

 

[JCGL]

Re : compte des couleur dans excel

Re,
Salut BH*2 ,

Même en rajoutant un Application.Volatile le recalcul ne se fait pas avec le code l'ami Ti (il est vrai que cette fonction n'était pas pour un recalcul au départ)
Après un rajout de _Change sur la feuille et Calculate cela joue mieux

A+

 

[BOISGONTIER]

Re : compte des couleur dans excel

Bonjour,

Sur Excel 2007, où le nombre de couleurs est 255x255x255, on peut utiliser
Color au lieu de ColorIndex.

Function CompteCouleurFond2(champ As Range)
   Application.Volatile
   couleurFond = Range(Application.Caller.Address).Interior.Color
   Dim c, temp
   temp = 0
   For Each c In champ
     If c.Interior.Color = couleurFond Then
       temp = temp + 1
     End If
   Next c
   CompteCouleurFond2 = temp
End Function

JB

 

[CED59]

MERCI pour compte des couleur dans excel

MERCI a tout le monde pour votre aide qui ma etait tres utiles
CED59