Excel - nombre de case verte

Qhes Messages postés 180 Statut Membre -  
Qhes Messages postés 180 Statut Membre -
Bonjour,

Est ce que c possible de calculer le nombre de cellule verte dans une colonne donnée?

Merci d'avance

10 réponses

  1. UsulArrakis Messages postés 7683 Statut Contributeur 3 196
     
    salut
    oui mais...
    quelle version d'excel ?
    la couleur vient-elle d'une mise en forme conditionnelle ?
    0
  2. Qhes Messages postés 180 Statut Membre 29
     
    je suis sous excel 2007 et ce sont des couleur que je met moi

    mais le filtr auto prend en compte mes couleurs
    0
    1. Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   6 453
       
      Bonsoir
      alors peut être une solution en attendant que notre ami UsulArrakis (bonsoir) vous trouve une macro appropriée:
      vous pouvez faire le total de la partie affichée seulement après le filtrage:
      dans une cellule au dessus du champ filtré (pour qu'elle reste visible):
      =SOUS.TOTAL(9;Colonne à sommer)
      cette formule vous donne le total des lignes apparentes, reste plus qu'à filtrer les vertes.
      crdlmnt:
      0
  3. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut,

    En VBA, plusieurs possibilités, soit en avec une fonction personnalisée ou avec une macro.
    Dans tous les cas si on veut compter les cellules d'une couleur précise il faut avoir le code index de la couleurs exemple pour le rouge l'index est le 3

    ce code est à associer à un bouton et comptera toutes les cellules de couleur sur la plage A1 à A100.

    Sub Test()
    For Each o In [A1:A100]
    If o.Interior.ColorIndex <> xlNone Then i = i + 1
    Next
    MsgBox i
    End Sub

    pour compter les cellules de couleur verte en supposant qu'il s'agit du vert brillant

    Sub Test()
    For Each o In [A1:A100]
    If o.Interior.ColorIndex = 4 Then i = i + 1
    Next
    MsgBox i
    End Sub

    Le nombre s'affiche sur une boite de dialogue (msgbox) mais pourrait s'afficher dans une cellule exemple en B1

    remplacer
    MsgBox i
    par
    [B1] = i
    ou simplement ajouter la ligne
    On pourrait également afficher le code couleur dans une liste déroulante ce qui permettrait en un clic avoir le nombre de cellules de la couleur sélectionnée

    A+
    Mike-31

    Une période d'échec est un moment rêvé pour semer les graines du savoir.
    0
  4. UsulArrakis Messages postés 7683 Statut Contributeur 3 196
     
    http://www.cijoint.fr/cjlink.php?file=cj201012/cijqGvdnnZ.zip
    quelques fichiers qui permettent de compter les couleurs
    dont un fichier du regretté Thierry POURTIER ("Ti" pour les intimes :-) trouvé sur son site "VERITI" : http://vlohr.free.fr/veriti/forum/index.php

    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Qhes Messages postés 180 Statut Membre 29
     
    Merci pour vos répone et désolé d'avoir mis si longteps à repondre.

    Est ce possible d'utiliser une formule plus qu'une macro
    0
  7. Qhes Messages postés 180 Statut Membre 29
     
    Je devrais peut etre préciser ma demande...
    j'ai une plage de cellule de C17 à AC34 et j'aimerais connaitre facilement le monbre de cellules vertes, oranges, bleues et rouges de cette plage...
    0
  8. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    tout dépend comment tes cellules sont colorisées:

    manuellement la réponse est non

    sur une mise en forme conditionnelle c'est possible mais dans ce cas quelle est la formule conditionnelle utilisée
    0
  9. Qhes Messages postés 180 Statut Membre 29
     
    c'est des couleurs mise manuellement...
    et la c'est le drame...
    c'est vraiment pas possible?

    On peux pas compter le nombre de cellules ayant le code couleur tant et le nombre de cellule ayant le code couleur tant2 etc?

    :(
    c'est triste...
    0
  10. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    Si il est possible mais avec un code VBA soit avec une fonction personnalisée ou une macro que l'on colle dans le visual basic

    un petit exemple de code qui comptera les cellules de couleur rouge de la plage A1 à A100 et affichera le nombre dans la cellule C2.

    sélectionne le code ci-dessous et clic droit/Copier
    clic droit sur l'onglet de ta feuille/Visualiser le code et dans la partie blanche de la feuille qui s'est ouverte clic droit Coller

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    For Each o In [A1:A100]
    If o.Interior.ColorIndex = 3 Then i = i + 1
    Next
    [C2] = i
    End Sub

    0
  11. Qhes Messages postés 180 Statut Membre 29
     
    Merci,

    ca marche!!! c'est génial
    j'ai juste ajouter un bouton et une boite de dialogue pour afficher le résultat :))

    c'es trop bien merci :)
    0