Countdown to an event2

[Jimmasterton]

Hi experts
I need some help please. I’m using Logits timer countdown :

In module :

Option Explicit
Public bTimerOn As Boolean
Sub ToggleTimer() ' This Sub will switch the automatic timer on if it was off before, and vice-versa
bTimerOn = Not bTimerOn
Refresh ' It calls the Refresh Sub
End Sub

Sub Refresh() ' This Sub calculates the sheet and tells Excel to call it again after 1 second
Application.Calculate
If bTimerOn Then ' If bTimerOn is True, start refreshing automatically
Application.OnTime Now + TimeValue("00:00:01"), "Refresh" ' The intervall is set to 1 second but can be changed variably
End If
End Sub

In workbook ;

Option Explicit
Private Sub Workbook_Open()
ToggleTimer
End Sub

Which works very well, but I’m trying to display a message when the countdown completely zeros. I’m having difficulty referencing the cell so I can userform.show. The cell zeros then goes to lots of #####, can anyone help?