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

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
(E-Mail Removed)



"Elton Law" <(E-Mail Removed)> wrote in message
news:702DECCC-909B-4C23-A8A3-(E-Mail Removed)...
> 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
>
>

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), _
Procedure:=...., 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