Jag är inte säker på om jag förstår vad du menar. Var står det vilket projekt som startar var? Arbetar varje person med samma projekt? Ska varje person arbeta t.ex. 161h med projekt 6220 osv? 

Ja, alla jobbar med samma projekt & i den ordningen de står. Så har man t.ex 10 olika projekt får man en bra överblick när man beräknas bli klar med respektive projekt.

Tack! Hoppas du får en lugn dag på jobbet:D

Så blev det efter lite om och men.. Kanske inte det bästa lösningen.

Jag började med att precis 20 rader ner lägga in enkla formler som hela tide plussar ihop varje sell så att man ser att antalet timma stiger.
I detta fallet från rad B22.
Jag gjorde även på rad 21 att jag plussade ihop de totala timmarna. Dessa går ju att dölja med vit färg på texten eller nått. Jag tog grå här nu så att det syns.

Sedan gjorde jag ett litet makro som jag lade i en modul.

   Sub BytFarg()

    Range("B2").Select
         Set rng = Range("B2:L18")
    For Each Cell In rng
            If Cell.Offset(20, 0).Value < Range("C21") Then
            Cell.Interior.ColorIndex = 9
                End If
            If Cell.Offset(20, 0).Value > Range("C21") And Cell.Offset(20, 0).Value < Range("D21") Then
            Cell.Interior.ColorIndex = 3
                        End If
            If Cell.Offset(20, 0).Value > Range("D21") And Cell.Offset(20, 0).Value < Range("E21") Then
            Cell.Interior.ColorIndex = 46
                        End If
            If Cell.Offset(20, 0).Value > Range("E21") And Cell.Offset(20, 0).Value < Range("F21") Then
            Cell.Interior.ColorIndex = 6
                                    End If
            If Cell.Offset(20, 0).Value > Range("F21") Then
            Cell.Interior.ColorIndex = 2
                                    End If
        Next
End Sub

Efter detta så gjorde jag sedan ett litet makro som jag sedan la i arbetsbladet som gör så att så fort du ändar något värde så körs åvanstående makro automatiskt.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.Run ("BytFarg")
End Sub