compter par colonne couleur rouge et vert

[MASSJIPE]

Bonjour
Je cherche une formule ou autre pour compter dans les colonnes les couleurs rouge et vert ci joint fichier
merci

 

[Matheop]

Re : compter par colonne couleur rouge et vert

Bonjour MASSJIPE,

Je suis pas sûr de ce que tu demandes mais bon si tu souhaites compter le nombre de cellules de couleur verte et le nombre de cellule de couleur rouge dans une colonne donnée alors tu peux tenter une macro du style:

Sub CompteurCouleurs()
    
    Dim nbVert As Integer
    Dim nbRouge As Integer
    Dim x As Integer
    
    nbVert = 0
    nbRouge = 0
    
    For x = 1 To 100 'une boucle qui part de la 1ère cellule à la 100ème
        Cells(x, 5).Select 'colonne E ligne x avec x étant variable donc - correspond à ton équipe A par exemple
        If Selection.Interior.ColorIndex = 4 Then
        'si l'intérieur de ta cellule est vert alors on incrémente le compteur vert
            nbVert = nbVert + 1
        ElseIf Selection.Interior.ColorIndex = 3 Then
        'si l'intérieur de ta cellule est rouge alors on incrémente le compteur rouge
            nbRouge = nbRouge + 1
        End If
    Next x

    'ensuite tu les affiches par exemple
    MsgBox "vert: " & nbVert
    MsgBox "rouge: " & nbRouge
    
End Sub

Bon c'est comme ça que je vois la chose, suffit de remplacer le nombre de cellules à "scanner", les index des couleurs et les colonnes selon tes besoins.