comptabiliser des cellules coloriées

kat

XLDnaute Nouveau
bjr à tous,
j'ai déjà suivi nombreuses astuces pour résoudre mon problème mais cela ne fonctionne jamais, je suis en train de me stresser ........
je voudrais SIMPLEMENT comptabiliser le nombre de cellules qui sont en rouge !!!!
merci d'avance pour votre aide
 

Pièces jointes

  • Classeur1.xls
    13.5 KB · Affichages: 56
  • Classeur1.xls
    13.5 KB · Affichages: 56
  • Classeur1.xls
    13.5 KB · Affichages: 60

Dull

XLDnaute Barbatruc
Re : comptabiliser des cellules coloriées

Salut kat et Bienvenue, le Forum

Il est de coutume, ici, de faire un minimum de recherche pour les questions qui sont maintes fois posées :) regardes au bas de cette pages les discussions similaires

essaye d'adapter le code de Staple ici

ce qui donnerait

Code:
Function aveccouleur(Plage As Range)
Dim Cell As Range
Dim cpt
For Each Cell In Plage
If Cell.Interior.ColorIndex = 3 Then
cpt = 1 + cpt
End If
Next Cell
aveccouleur = cpt
End Function
ensuite en colonne AE il te suffit d'écrire
Code:
=aveccouleur(A1:AD1)
et tu aura le nombre de couleur Rouge en ligne

EDIT:
Salut Pierre :)
Bonne Journée
 

Pièces jointes

  • kat.xls
    23.5 KB · Affichages: 38
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 429
Messages
2 088 350
Membres
103 823
dernier inscrit
ben talha redouane