Display a counter

[Guest]

Hi

Is there any way I can display a continuous timer in a cell, ie start a
counter that changes value every second.

 

[louisjohnphillips]

Hi

Is there any way I can display a continuous timer in a cell, ie start a
counter that changes value every second.

The form has a Timer property. If during the Form Load event, the
TimerInterval property is set to 1000, the form timer event will fire
every 1000 milliseconds. In the code below, the sleTimerDisplay is an
unbound control on the form.
It's value is updated with the current time every second.

Private Sub form_load()
Me.TimerInterval = 1000

End Sub

Private Sub Form_Timer()
Me.sleTimerDisplay.Value = Now()
End Sub