Maand en kleur tellen

[Krolletje]

Hoi,

Voor een rapport dat ik moet maken bekijk ik welke taken in een jaar op tijd correct zijn afgerond en welke niet. Dat gaat op basis van een eigen kleur formule (=CountCcolor(($B2:$F2),G$1)). Nu wil ik ook echter per maand de groene en rode taken kunnen berekenen, maar daar kom ik nog niet uit. Dus mocht iemand mij hierbij kunnen helpen graag.

Zie attachment met voorbeeld.

Bekijk bijlage tijd-en-kleur-tellen.xlsm

 

[edmoor]

Gebruik dan deze variatie op je eigen functie

Function CountCcolorMonth(range_data As Range, criteria As Range, mMonth As Integer) As Long
    Dim datax As Range
    Dim xcolor As Long
    
    xcolor = criteria.Interior.ColorIndex
    For Each datax In range_data
        If datax.Interior.ColorIndex = xcolor And Month(datax) = mMonth Then
            CountCcolorMonth = CountCcolorMonth + 1
        End If
    Next datax
End Function

Met deze aanroep voor januari op tijd:
=CountCcolorMonth($B2:$F2;$I$1;1)

 

[Krolletje]

Dank je. Ik krijg helaas nog wel een error als ik hem uitprobeer in mijn voorbeeld excel.

 

[edmoor]

Als je zegt een fout te krijgen is het ook handig erbij te vertellen welke dat dan is want daar zijn er maar een 10.000 van ofzo. Het voorbeeld dat ik voor je maakte werkt hier in je eigen document prima.

 

[Krolletje]

Met een , ipv een ; doet ie het nu wel.

 

[edmoor]

Dan heb je kennelijk een Engelse versie van Office.