software

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(quot;00:00:5quot;), quot;stop1quot;
End Sub

Thanks Leon

I've not done much with OnTime, but with the help of this group I got the
following line working.

Application.OnTime earliesttime:=Now TimeSerial(0, 0, 3),
procedu=quot;UnhideColumnsquot;

--
Ian
--
quot;Puzzledquot; gt; wrote in message
...
gt; Looking for help in making a stop macro the below timer macro
gt; Timer works but seems to continue running
gt;
gt; Public Sub timer1()
gt; Application.OnTime Now TimeValue(quot;00:00:5quot;), quot;stop1quot;
gt; End Sub
gt;
gt; Thanks Leon
Thank you

quot;Ianquot; wrote:

gt; I've not done much with OnTime, but with the help of this group I got the
gt; following line working.
gt;
gt; Application.OnTime earliesttime:=Now TimeSerial(0, 0, 3),
gt; procedu=quot;UnhideColumnsquot;
gt;
gt; --
gt; Ian
gt; --
gt; quot;Puzzledquot; gt; wrote in message
gt; ...
gt; gt; Looking for help in making a stop macro the below timer macro
gt; gt; Timer works but seems to continue running
gt; gt;
gt; gt; Public Sub timer1()
gt; gt; Application.OnTime Now TimeValue(quot;00:00:5quot;), quot;stop1quot;
gt; gt; End Sub
gt; gt;
gt; gt; Thanks Leon
gt;
gt;
gt;

You're welcome. Nice to get the feedback.

--
Ian
--
quot;Puzzledquot; gt; wrote in message
...
gt; Thank you
gt;
gt; quot;Ianquot; wrote:
gt;
gt;gt; I've not done much with OnTime, but with the help of this group I got the
gt;gt; following line working.
gt;gt;
gt;gt; Application.OnTime earliesttime:=Now TimeSerial(0, 0, 3),
gt;gt; procedu=quot;UnhideColumnsquot;
gt;gt;
gt;gt; --
gt;gt; Ian
gt;gt; --
gt;gt; quot;Puzzledquot; gt; wrote in message
gt;gt; ...
gt;gt; gt; Looking for help in making a stop macro the below timer macro
gt;gt; gt; Timer works but seems to continue running
gt;gt; gt;
gt;gt; gt; Public Sub timer1()
gt;gt; gt; Application.OnTime Now TimeValue(quot;00:00:5quot;), quot;stop1quot;
gt;gt; gt; End Sub
gt;gt; gt;
gt;gt; gt; Thanks Leon
gt;gt;
gt;gt;
gt;gt;