ontime function stops after 24hrs

E

elfranzen

Registered User.
Local time
Today, 14:31
Joined
Jul 26, 2007
Messages
93
Here is my ontime code that is in the workbook open
Code: 
 Application.OnTime TimeValue("03:00:00"), "Macro03"
     Application.OnTime TimeValue("03:03:00"), "Macro04gamecount"
     Application.OnTime TimeValue("03:15:00"), "Macro04"
     Application.OnTime TimeValue("03:30:00"), "Macro04"
     Application.OnTime TimeValue("03:45:00"), "Macro04"
     Application.OnTime TimeValue("04:00:00"), "Macro04"
     
     Application.OnTime TimeValue("04:03:00"), "Macro05gamecount"
     Application.OnTime TimeValue("04:15:00"), "Macro05"
     Application.OnTime TimeValue("04:30:00"), "Macro05"
     Application.OnTime TimeValue("04:45:00"), "Macro05"
     Application.OnTime TimeValue("05:00:00"), "Macro05"
     
     Application.OnTime TimeValue("05:03:00"), "Macro06gamecount"
     Application.OnTime TimeValue("05:15:00"), "Macro06"
     Application.OnTime TimeValue("05:30:00"), "Macro06"
     Application.OnTime TimeValue("05:45:00"), "Macro06"
     Application.OnTime TimeValue("06:00:00"), "Macro06"
     
     Application.OnTime TimeValue("06:03:00"), "Macro07gamecount"
     Application.OnTime TimeValue("06:15:00"), "Macro07"
     Application.OnTime TimeValue("06:30:00"), "Macro07"
     Application.OnTime TimeValue("06:45:00"), "Macro07"
     Application.OnTime TimeValue("07:00:00"), "Macro07"
     
     Application.OnTime TimeValue("07:03:00"), "Macro08gamecount"
     Application.OnTime TimeValue("07:15:00"), "Macro08"
     Application.OnTime TimeValue("07:30:00"), "Macro08"
     Application.OnTime TimeValue("07:45:00"), "Macro08"
     Application.OnTime TimeValue("08:00:00"), "Macro08"
     
     Application.OnTime TimeValue("08:03:00"), "Macro09gamecount"
     Application.OnTime TimeValue("08:15:00"), "Macro09"
     Application.OnTime TimeValue("08:30:00"), "Macro09"
     Application.OnTime TimeValue("08:45:00"), "Macro09"
     Application.OnTime TimeValue("09:00:00"), "Macro09"
     
     Application.OnTime TimeValue("09:03:00"), "Macro10gamecount"
     Application.OnTime TimeValue("09:15:00"), "Macro10"
     Application.OnTime TimeValue("09:30:00"), "Macro10"
     Application.OnTime TimeValue("09:45:00"), "Macro10"
     Application.OnTime TimeValue("10:00:00"), "Macro10"
     
     Application.OnTime TimeValue("10:03:00"), "Macro11gamecount"
     Application.OnTime TimeValue("10:15:00"), "Macro11"
     Application.OnTime TimeValue("10:30:00"), "Macro11"
     Application.OnTime TimeValue("10:53:00"), "Macro11"
     Application.OnTime TimeValue("11:00:00"), "Macro11"
       
     
     
     
     
     
     
     Application.OnTime TimeValue("11:03:00"), "Macro12gamecount"
     Application.OnTime TimeValue("11:15:00"), "Macro12"
     Application.OnTime TimeValue("11:30:00"), "Macro12"
     Application.OnTime TimeValue("11:45:00"), "Macro12"
     Application.OnTime TimeValue("12:00:00"), "Macro12"
     
     Application.OnTime TimeValue("12:03:00"), "Macro13gamecount"
     Application.OnTime TimeValue("12:15:00"), "Macro13"
     Application.OnTime TimeValue("12:30:00"), "Macro13"
     Application.OnTime TimeValue("12:45:00"), "Macro13"
     Application.OnTime TimeValue("13:00:00"), "Macro13"
     
     Application.OnTime TimeValue("13:03:00"), "Macro14gamecount"
     Application.OnTime TimeValue("13:15:00"), "Macro14"
     Application.OnTime TimeValue("13:30:00"), "Macro14"
     Application.OnTime TimeValue("13:45:00"), "Macro14"
     Application.OnTime TimeValue("14:00:00"), "Macro14"
     
     Application.OnTime TimeValue("14:03:00"), "Macro15gamecount"
     Application.OnTime TimeValue("14:15:00"), "Macro15"
     Application.OnTime TimeValue("14:30:00"), "Macro15"
     Application.OnTime TimeValue("14:45:00"), "Macro15"
     Application.OnTime TimeValue("15:00:00"), "Macro15"
     
     Application.OnTime TimeValue("15:03:00"), "Macro16gamecount"
     Application.OnTime TimeValue("15:15:00"), "Macro16"
     Application.OnTime TimeValue("15:30:00"), "Macro16"
     Application.OnTime TimeValue("15:45:00"), "Macro16"
     Application.OnTime TimeValue("16:00:00"), "Macro16"
     
     Application.OnTime TimeValue("16:03:00"), "Macro17gamecount"
     Application.OnTime TimeValue("16:15:00"), "Macro17"
     Application.OnTime TimeValue("16:30:00"), "Macro17"
     Application.OnTime TimeValue("16:45:00"), "Macro17"
     Application.OnTime TimeValue("17:00:00"), "Macro17"
     
     Application.OnTime TimeValue("17:03:00"), "Macro18gamecount"
     Application.OnTime TimeValue("17:15:00"), "Macro18"
     Application.OnTime TimeValue("17:30:00"), "Macro18"
     Application.OnTime TimeValue("17:45:00"), "Macro18"
     Application.OnTime TimeValue("18:00:00"), "Macro18"
     
     Application.OnTime TimeValue("18:03:00"), "Macro19gamecount"
     Application.OnTime TimeValue("18:15:00"), "Macro19"
     Application.OnTime TimeValue("18:30:00"), "Macro19"
     Application.OnTime TimeValue("18:45:00"), "Macro19"
     Application.OnTime TimeValue("19:00:00"), "Macro19"
     
     Application.OnTime TimeValue("19:03:00"), "Macro20gamecount"
     Application.OnTime TimeValue("19:15:00"), "Macro20"
     Application.OnTime TimeValue("19:30:00"), "Macro20"
     Application.OnTime TimeValue("19:45:00"), "Macro20"
     Application.OnTime TimeValue("20:00:00"), "Macro20"
     
     Application.OnTime TimeValue("20:03:00"), "Macro21gamecount"
     Application.OnTime TimeValue("20:15:00"), "Macro21"
     Application.OnTime TimeValue("20:30:00"), "Macro21"
     Application.OnTime TimeValue("20:45:00"), "Macro21"
     Application.OnTime TimeValue("21:00:00"), "Macro21"
     
     Application.OnTime TimeValue("21:03:00"), "Macro22gamecount"
     Application.OnTime TimeValue("21:15:00"), "Macro22"
     Application.OnTime TimeValue("21:30:00"), "Macro22"
     Application.OnTime TimeValue("21:45:00"), "Macro22"
     Application.OnTime TimeValue("22:00:00"), "Macro22"
     
     Application.OnTime TimeValue("22:03:00"), "Macro23gamecount"
     Application.OnTime TimeValue("22:15:00"), "Macro23"
     Application.OnTime TimeValue("22:30:00"), "Macro23"
     Application.OnTime TimeValue("22:45:00"), "Macro23"
     Application.OnTime TimeValue("23:00:00"), "Macro23"
     
     Application.OnTime TimeValue("23:03:00"), "Macro00gamecount"
     Application.OnTime TimeValue("23:15:00"), "Macro00"
     Application.OnTime TimeValue("23:30:00"), "Macro00"
     Application.OnTime TimeValue("23:45:00"), "Macro00"
     Application.OnTime TimeValue("00:00:00"), "Macro00"
     
     Application.OnTime TimeValue("00:03:00"), "Macro01gamecount"
     Application.OnTime TimeValue("00:15:00"), "Macro01"
     Application.OnTime TimeValue("00:30:00"), "Macro01"
     Application.OnTime TimeValue("00:45:00"), "Macro01"
     Application.OnTime TimeValue("01:00:00"), "Macro01"
     
     Application.OnTime TimeValue("01:03:00"), "Macro02gamecount"
     Application.OnTime TimeValue("01:15:00"), "Macro02"
     Application.OnTime TimeValue("01:30:00"), "Macro02"
     Application.OnTime TimeValue("01:45:00"), "Macro02"
     Application.OnTime TimeValue("02:00:00"), "Macro02"
     
     Application.OnTime TimeValue("02:03:00"), "Macro03gamecount"
     Application.OnTime TimeValue("02:15:00"), "Macro03end"
     Application.OnTime TimeValue("02:30:00"), "Macro03end"
     Application.OnTime TimeValue("02:45:00"), "Macro03end"
     Application.OnTime TimeValue("02:57:30"), "Macro03end"
now it will save with the date in the file name and wipe the sheet blank but i want the code to start over how is this done without closing the book and opening it again. I tried this method but was having problems.
Thanks
FYI.... my day runs form 3am to 2:59am if you were wondering
 
You must log in or register to reply here.

Similar threads

MattBaldry
Start and End Times with Overlap
Replies
11
Views
352
arnelgp
arnelgp
A
Solved How to change date portion at beginning
Replies
13
Views
1,221
Ashfaque
A
M
Crosstab report with calculated label to show each day of month as label and working hours depending on employee shifts
Replies
2
Views
978
Gasman
Gasman
J
import CSV, update timestamp to now() if already in table.
Replies
2
Views
1,044
arnelgp
arnelgp
S
Using IIF function in the ORDER BY statement in a Query
Replies
5
Views
1,291
ebs17
E

Users who are viewing this thread

Total: 1 (members: 0, guests: 1)
Back
Top Bottom