tijd optellen volgens kleur v/d cel

[Movvy]

Beste,

Ik probeer een lijst te maken met mijn gepresteerde overuren en opgenomen overuren op mijn werk automatische op te tellen en af te trekken.

Ik heb deze tutorial (http://www.exceltrick.com/how_to/sum-cells-based-on-background-color/ 3e methode) gevolgd om cellen op te tellen volgens de achtergrond kleur van een cell (alle rode cellen,alle groene cellen etc)
Dit lukt prima maar wanneer ik de cellen naar tijd formaat omzet werkte deze methode niet meer.Weet iemand een manier om deze methode te gebruiken met tijd of heeft iemand een beter methode?

Voordbeeldje van wat ik bedoel:

Alvast bedankt!

Groetjes Nikolas.

 

[ExcelAmateur]

Nicolas,

Heb je soms vwo gebruikt in je bestandje?
Zet even een voorbeeld hier, dus geen plaatje.

 

[edmoor]

Daarnaast staan in je voorbeeld plaatje alleen cellen met tekst en geen tijden die bij elkaar geteld kunnen worden.

 

[Movvy]

Bekijk bijlage over uren excel.rar

dit is mijn test bestand

 

[edmoor]

Je VBA functie is niet goed en de parameters zijn niet correct meegegeven. Wijzig de functie in dit:

Function SumByColor(CellColor As Range, rRange As Range) As Double
    Dim ColIndex As Integer
    
    ColIndex = CellColor.Interior.ColorIndex
    For Each cl In rRange
        If cl.Interior.ColorIndex = ColIndex Then
            SumByColor = SumByColor + cl.Value
        End If
    Next cl
End Function

De functie in D4:

=SumByColor(C4;$B$2:$B$13)

Trek die vervolgens door naar D5

 

[Movvy]

Bekijk bijlage over uren test.rarNu krijg ik ''#NAME?'' enkel.

Mijn excuses voor mijn gebrekkige kennis van codes/excel!

Alvast bedankt

 

[edmoor]

Mijn excuses voor mijn gebrekkige kennis van codes/excel!

Dat geeft niks, daar zijn we voor toch?

Heb je die functie wel in een module gezet?

Dit is je eigen document met de wijzigingen zoals gemeld. Bij mij werkt het goed.
Bekijk bijlage overuren test.xlsm

 

[Movvy]

Hartelijk dank voor de hulp!Werkt exact zoals ik het wou.

fijne avond nog

 

[edmoor]

Graag gedaan en hetzelfde gewenst