Klokken vist på excel via VBA

Hvordan får jeg vist denne rigtigt?

Option Explicit

Public Kørklok As Double

Sub Updateklokken()
With Range("A1")
.Value = Now
.NumberFormat = "dd:mm:åååå:hh:mm"
End With

Kørklok = Now + TimeSerial(0, 0, 1)

Application.OnTime earliesttime:=Kørklok, _
procedure:="Updateklokken", schedule:=True
End Sub

Den viser 13:01:søndag:17:52

Jeg vil gerne have den til at vise aktuel tid som f.eks. og i nævnte format

Søndag 13. januar klokken 17:52

Forhånd tak for hjælpen