Compter les cellules d'une certaine couleur

Résolu
Bonjour,

J'ai réalisé un calendrier (Lignes=jours, Mois=Colonnes) de mes congés, RTT...etc, ou chacune des dates est coloriée différemment selon qu'il s'agisse d'une journée travaillée, congé, ou RTT.
Je souhaiterais maintenant comptabiliser ces différentes journées automatiquement.
Quelqu'un a-t-il une astuce?

Merci d'avance.
Configuration: Windows XP pro
Internet Explorer 7.0, Excel 2002

5 réponses

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    Bonjour,

    une tite fonction personnalisée si ça te va :
    Function CptCouleur(plage As Range, couleur As Range) As Long
        Dim cpt As Long, cel As Range
        cpt = 0
        For Each cel In plage
            cpt = cpt - (cel.Interior.ColorIndex = couleur.Interior.ColorIndex)
        Next cel
        CptCouleur = cpt
    End Function

    à copier dans un module.
    'Insertion / fonction' puis 'personnalisées', sélectionner CptCouleur, en premier paramètre désigner la plage avec la souris, en 2nd paramètre désigner 1 cellule ayant la couleur de fond que l'on désire compter.

    l'exemple : http://www.cijoint.fr/cjlink.php?file=cj200805/cijOE7fyqO.xls
    mais fait sur excel 2003...
    eric
    1. Merci Eric, ça marche super!

      Merci à tous les autres pour votre participation.
  2. Bonjour,

    En standard, il faut passer en excel 2007
    1. Merci de ta réactivité, mais n'as-tu rien d'autre à me proposer, c'est un PC pro et je ne maîtrise pas les changements de version Excel!
  3. Il faudra sans doute utiliser une macro en excel 2002.
    1. OK, c'est un peu ce que je pensais aprés avoir parcouru toutes les fonctions d'excel et l'aide en ligne.
      Je tate un petit peu de VBA, mais si je pouvais trouver une base de code toute faite, ça m'arrangerais.
  4. Contributeur
    Bonjour,

    arrivé juste après Eric, je n'avais vu sa fonction qui répond au problème

    je vien,s donc d'enlever ma proposition

    Michel