VBA If current time is > 5PM then

[sdoppke]

Hi everyone could someone help me add some code to a script like so:
If current time is > 5PM Then Call MyMacro

thanks a ton in advance.

sd

 

[Snakehips]

sdoppke,

Try somthing like.....

If Hour(Now) > 17 Then 
Call YourMacro
End If

 

[Snakehips]

sdoppke,


On reflection it should be...

If Hour(Now) > 16

Hope that helps.

 

[Papire]

Try this:

currentHour = DatePart("h", Time)
'*** 5:00 PM is hour 17
if currentHour > 17 then 
Call YourMacro
End If

 

[skywriter]

Try this:

currentHour = DatePart("h", Time)
'*** 5:00 PM is hour 17
if currentHour > 17 then 
Call YourMacro
End If

The question is, what do we mean by >5PM.

Do we mean 6:00PM and later or do we mean 5:00:01 and later?

See the posts by Snakehips.

 

[errn12]

I realize this is a very old thread but I'm hoping someone sees it and can help. Trying to use a similar code to this but I need the code to pull during a time range--from 5pm until 8AM. I have tried "If ReceivedHour < 08 or > 17 Then" and I keep getting an error. the code works fine with only one time variable. Thanks.

 

[jmacleary]

Hi there. Try If ReceivedHour < 08 or ReceivedHour > 17 Then

 

[Snakehips]

I realize this is a very old thread but I'm hoping someone sees it and can help. Trying to use a similar code to this but I need the code to pull during a time range--from 5pm until 8AM. I have tried "If ReceivedHour < 08 or > 17 Then" and I keep getting an error. the code works fine with only one time variable. Thanks.

Syntax as per jmacleary ^^^ but 16 not 17

If ReceivedHour < 8 Or ReceivedHour > 16 Then

Hope that helps.

 

[jmacleary]

Doh. Well done snakehips - I read your original correction but then forgot it by the time I wrote my reply - all of 1 minute later!!