compter les cel dif et de couleur dif

[qsd88]

Bonjour
Vola je galère depuis un moment
Je dispose d'une colonne avec du texte de couleur différente:
ap
ap
ap
cl
ab
ap

et je souhaiterai compter le nombre de cellule par texte puis par couleur de façon à avoir comme résultat pour cette exemple:
ap 3
ap 1
cl 1
ab 1

Merci d'avance à ceux qui prendront le temps de m'aider

 

[James007]

Re : compter les cel dif et de couleur dif

Bonjour,

Dans la mesure où ce sujet a déjà été traité à maintes reprises, tu peux regarder dans le bas de cette page, dans la section Discussions similaires ...
tu devrais y trouver de quoi progresser vers la solution de ton problème ...

A +

 

[qsd88]

Re : compter les cel dif et de couleur dif

Merci
J'ai étudié ces postes mais ils parlent de solution dans le cas de MFC or mes couleurs sont appliqué manuellement donc je dois utiliser un module vba non ?

 

[James007]

Re : compter les cel dif et de couleur dif

Re,

Tu trouveras ci joint une fonction adaptée à ta demande ...

A +

 

[ROGER2327]

Re : compter les cel dif et de couleur dif

Bonjour à tous

Voyez si cette fonction personnalisée fait l'affaire :

[COLOR=DarkSlateGray][B]Function cpte(Patron As Range, Zone As Range)
Application.Volatile
Dim oCel As Range
  For Each oCel In Zone.Cells
    If Patron.Value = oCel.Value And Patron.Font.Color = oCel.Font.Color Then cpte = cpte + 1
  Next oCel
End Function[/B][/COLOR]

ROGER2327
#4718

Lundi 9 Sable 138 (Saint Sagouin, homme d'Etat, SQ)
19 Frimaire An CCXIX
2010-W49-4T15:34:30Z

 

[qsd88]

Re : compter les cel dif et de couleur dif

Re,

Tu trouveras ci joint une fonction adaptée à ta demande ...

A +

Merci James007 c'est exactement ce que je cherchais

 

[James007]

Re : compter les cel dif et de couleur dif

Merci James007 c'est exactement ce que je cherchais

De rien ... merci pour tes remerciements ...

La fonction de ROGER2327 ( salut ROGER ) est encore plus condensée que la mienne ...

A +