Code preventing Excel from closing down

At the onset, I am not proficient with VBA coding and trying my hands on it for the first time.

I created a message board in the excel tool that I am building that displayes three messages. It is a List box for which the Captin keeps changing every 5 seconds.

This is (I believe) preventing the excel file from closing. When I close, I get the Save / Dont save option. Irrespective of what I press, the file closes and then opens up again.

When I turn both of these codes off, it closes properly.

I am giving the code below:

Under Module 1:

Public Sub Scroll()
Dim temp As Variant
temp = Sheet20.Label1.Caption
Sheet20.Label1.Caption = Sheet20.Label2.Caption
Sheet20.Label2.Caption = Sheet20.Label3.Caption
Sheet20.Label3.Caption = temp
Application.OnTime Now + TimeValue("00:00:05"), "ScrollIt"
End Sub

Under 'This Workbook' :

Public Sub Workbook_Open()
        
        Application.OnTime Now + TimeValue("00:00:05"), "Scroll"
        
End Sub

Thanks a bunch. This was very helpful. I changed the codes as necessary and it works perfectly now.