Доступ к выполнению кода VBA завершение и перезапуск после определенного интервала

Question

В настоящее время я запускаю Access VBA для навигации по url. Теперь я хочу остановить VBA через некоторое время, а затем перезапустить через некоторое время. т.е. Хотите остановиться на Первое время начала VBA + 4 часа , а затем хотите перезапустить VBA на Время остановки VBA + 5 минут.

В принципе, я хочу остановить VBA каждые четыре часа, а затем перезапустить VBA через 5 минут. Я хочу запустить и остановить выполнение ниже указанного кода через 4 часа, а затем перезапустить через 5 минут. Спасибо.

Private Sub getdata() 

Dim Ie As New InternetExplorer 
Dim WebURL 
Dim Docx As HTMLDocument 
Dim productDesc 
Dim productTitle 
Dim price 
Dim RcdNum 

Ie.Visible = False 


WebURL = "http://www.ebay.com/itm/Polarized-sunglasses-Mens-Driving-glasses-Aviator-outdoor-Sports-UV400-Eyewear-/252063564211?var=&hash=item3ab028c1b3:m:mYPFr4la1j-kJkrA9w_oxDw" 
Ie.Navigate2 WebURL 
Do Until Ie.ReadyState = READYSTATE_COMPLETE 
DoEvents 
Loop 
Set Docx = Ie.Document 

productDesc1 = Docx.getElementsBytagName("title") 

End Sub 

Answer 1

Чтобы начать свое задание в определенное время, вы должны запланировать выполнение процесса в определенное время. использовать Application.OnTime TimeValue("18:00:00"), "MyMacro"

как в http://p2p.wrox.com/excel-vba/71210-schedule-vba-macro-run-specific-time.html

И остановить просто создать и если условие, что проверить, сколько времени в настоящее время.