Range(“A1”).Value = Format(Time, “hh:mm:ss”)
NextUpdate = Now + TimeValue(“00:00:01”)
Application.OnTime NextUpdate, “StartClock”
End Sub
Sub StopClock()
Range(“A1”).Value = Format(Time, “hh:mm:ss”)
NextUpdate = Now + TimeValue(“00:00:01”)
Application.OnTime NextUpdate, “StartClock”
End Sub
Sub StopClock()
