Compter les cases d'une couleur donnée avec un texte donné

Bonjour,

j'ai ce tableau pour lequel je veux compter le nombre de cases avec marqué Contrôle1, pour une couleur donnée.

Pour compter un texte, j'utilise NB.SI, pour le nb de cases d'une couleur Nb_si_couleur mais je n'arrive pas à faire une requête sur les deux

J'essaye ceci : =NB.SI.ENS(Calendrier!$B$11:$AE$13;A10;Calendrier!$B$11:$AE$13;NB_SI_COULEUR(65535)) mais sans succès

Merci pour votre aide !

Bonjour,

Je ne connais pas l'add-in donc je ne sais pas si NO_COULEUR peut renvoyer la couleur de plusieurs cellules.

Je propose une solution avec une fonction qui peut renvoyer la couleur de plusieurs cellules, à voir si ça marche toujours en remplaçant ma fonction avec NO_COULEUR:

A noter que le changement de couleur d'une cellule ne provoque pas le recalcul du classeur, il faudra lancer le calcul manuellement.

Code de la fonction que j'utilise:

Function f_couleur(Plage As Range)
Dim tableau As Variant

Application.Volatile

ReDim tableau(1 To Plage.Rows.Count, 1 To Plage.Columns.Count)

For i = 1 To UBound(tableau, 1)
    For j = 1 To UBound(tableau, 2)
        tableau(i, j) = Plage.Cells(i, j).Interior.Color
    Next j
Next i

f_couleur = tableau
End Function

Merci beaucoup !