Velkomst når man åbner excel

Jeg har en lille stump kode, som gerne skulle virke, når man åbner et excelark - men det virker ikke!

Hvor gør jeg fejl? Har prøvet at sætte det ind via f11 som module. Måske er det forkert - eller en koden ikke færdig!

Private Sub Workbook_Open()
If Time < 0.5 Then Msg = "morning "
If Time >= 0.5 And Time < 0.75 Then Msg = "afternoon "
If Time >= 0.75 Then Msg = "evening "
MsgBox "Good " & Msg & Application.UserName
End Sub

Forhånd tak for hjælpen.

NB: Der er andre macroer i workbook.