Date Marco
 

Dear Expert,
Have asked for time marco before.
Just wonder how to write the date marco in VB please ?
Say want to run on 5 May 9:00 AM please ?
Thanks

Date Marco
 

Do you want to display a date or run some code on a date?

Elton Law;331987 Wrote:
Dear Expert,
Have asked for time marco before.
Just wonder how to write the date marco in VB please ?
Say want to run on 5 May 9:00 AM please ?
Thanks


--
Simon Lloyd

Regards,
Simon Lloyd
'The Code Cage' (http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1
View this thread: http://www.thecodecage.com/forumz/sh...ad.php?t=92790

Date Marco
 

Using these two procedures, Start will initiate the run when it is 9am, in
my_date if the date is 5th May 09 then code will run, else Start is re-run
to wait for 9am next day.

Sub Start()
Application.OnTime TimeValue("09:00:00"), "my_date"
End Sub

Sub my_date()
If Date < DateSerial(2009, 5, 5) Then
Start
Exit Sub
End If

'your code to run at 9am on 5/5/09

End Sub

--

Regards,
Nigel




"Elton Law" wrote in message
...
Dear Expert,
Have asked for time marco before.
Just wonder how to write the date marco in VB please ?
Say want to run on 5 May 9:00 AM please ?
Thanks

Date Marco
 

First, I would read Chip Pearson's notes:
http://www.cpearson.com/excel/OnTime.aspx

And second,

Application.OnTime EarliestTime:=dateserial(2009,5,9)+timeserial(9,0, 0), _
Procedu=...., Schedule:=True

Remember that if you close excel, then this scheduled macro won't run.


Elton Law wrote:

Dear Expert,
Have asked for time marco before.
Just wonder how to write the date marco in VB please ?
Say want to run on 5 May 9:00 AM please ?
Thanks

--

Dave Peterson