Looking for help in making a stop macro the below timer macro
Timer works but seems to continue running

Public Sub timer1()
Application.OnTime Now + TimeValue("00:00:5"), "stop1"
End Sub

Thanks Leon