Triggering Macro hourly without onTime ?

[JumboCactuar]

Hi,
Thinking of ways I can trigger a macro hourly without using application.ontime
application.ontime can cause issues and I don't find it too reliable.

My idea was to have a cell containing current time =Now()-Today()

Then cells with a 1/0 flag for each hour

Worksheet_Change event with if statement like:
If time between 15:00 and 16:00 and flag is 0 then run macro and set flag to 1.

Any other way to approach this?
Macro I'm wanting to do is send an email hourly

Thanks for any input

 

[offthelip]

You will find that Now() doesn't update until the worksheet is recalculated, and if nothing is triggering a recalc it will just remain at the orignal value. One way you could do this is to create a web query to download the data from this site which is GMT time:
https://time.is/GMT
Then update the query to refresh every minute, you can then check the time against real GMT time although i expect the latency to be quite a few seconds.
I don't suppose this is any better than application ontime , but you could try it.
#

 

[JumboCactuar]

You will find that Now() doesn't update until the worksheet is recalculated, and if nothing is triggering a recalc it will just remain at the orignal value. One way you could do this is to create a web query to download the data from this site which is GMT time:
https://time.is/GMT
Then update the query to refresh every minute, you can then check the time against real GMT time although i expect the latency to be quite a few seconds.
I don't suppose this is any better than application ontime , but you could try it.
#

Thanks I will give it a try
Though the worksheet is used all throughout the day and calculated multiple times per hour so I think the worksheet change could be Ideal

 

[Jaafar Tribak]

Hi,
Thinking of ways I can trigger a macro hourly without using application.ontime
application.ontime can cause issues and I don't find it too reliable.

My idea was to have a cell containing current time =Now()-Today()

Then cells with a 1/0 flag for each hour

Worksheet_Change event with if statement like:
If time between 15:00 and 16:00 and flag is 0 then run macro and set flag to 1.

Any other way to approach this?
Macro I'm wanting to do is send an email hourly

Thanks for any input

Have you considered using a Windows Timer API like SetTimer ?