Microsoft 365 Compter le nombre de cellule colorié selon une critère date

st007 à dit:

Bonjour, tout dépend de comment est fixé ta couleur, mais une recherche sur la fonction somme couleur fond devrait te secourir

Cliquez pour agrandir...

JHA à dit:

Bonjour à tous,

Tu peux filtrer les couleurs de la colonne "A" et/ou "B" puis mettre cette formule dans l'onglet "Sheet1" en cellule "B2"

VB:

=SOMMEPROD((SOUS.TOTAL(3;DECALER(Feuil1!$B$1;LIGNE(Feuil1!$2:$130);)))*(MOIS(Feuil1!$B$2:$B$130)=LIGNE()-1))

copier vers le bas

JHA

Cliquez pour agrandir...

JHA à dit:

Bonjour à tous,

Il faut passer par VBA mais désolé, je ne sais pas le faire.

JHA

Cliquez pour agrandir...

Bernard_XLD à dit:

Bonjour Abdoul aziz, st007,JHA, le forum

Une proposition avec une fonction personnalisée Vba, elle compte dans les codes de la colonne mise en premier paramètre les couleurs correspondant à la couleur de fond du mois de sheet1 passé en deuxième paramètre et dont le texte du mois de feuil1 correspond au mois de sheet1.

Bien cordialement, @+
Regarde la pièce jointe 1134021

VB:

Option Compare Text
Function Nbr_Couleurs_Mois(Cells_Code As Range, Mois_Ref As Range)
Dim Cel_Ref As Range, Nbr_Couleurs&
For Each Cel_Ref In Cells_Code
    If Cel_Ref.Interior.Color = Mois_Ref.Interior.Color And Mois_Ref.Value2 = Format(Cel_Ref.Offset(0, 1).Value, "mmmm") Then Nbr_Couleurs = Nbr_Couleurs + 1
Next Cel_Ref
Nbr_Couleurs_Mois = Nbr_Couleurs
End Function

Cliquez pour agrandir...