執行時間問題?

各位大大:
附件的EXCEL我設定在8:45~13:45間執行
但每次在8:45前執行以等待8:45開始記錄但去都無法啟動程式紀錄
都必須等8:45後執行程式才會啟動記錄!不知問題出在哪兒?
懇請版上大大協助修正

謝謝

感恩

量.rar (12.12 KB)

2^#

發表於 2012-6-7 20:15 | 顯示全部帖子

If (TimeValue(Now) = TimeValue("13:45:00")) Then Exit Sub '營業時間才執行
若在8:45前或13:45以後即離 ...
ANGELA 發表於 2012-6-7 20:05

Dear這我能理解
但問題是我在8:44執行程式後過了8:45卻沒動作啊?
想問是甚麼原因和如何修正?

謝謝感恩

3^#

發表於 2012-6-7 21:01 | 顯示全部帖子

回復 mead
因為在8:45以前開檔，雖然有執行一次Timer
但因為直接跳出程序，並未準備下一次執行Timer
判 ...
Hsieh 發表於 2012-6-7 20:28

感謝總版主的指導
但照此修改  還是不行!
過了設定時間沒動作  退出再進入  即變成隨時在記錄了!
麻煩再指導

謝謝  感恩

4^#

發表於 2012-6-7 22:04 | 顯示全部帖子

回復 mead
Hsieh 發表於 2012-6-7 21:51

感謝總版主這麼快回覆
剛剛測試的結果已可行
明天盤中再測試看看

謝謝總版主的熱心幫忙

感恩再感恩

5^#

發表於 2012-6-8 18:07 | 顯示全部帖子

回復 mead
關鍵在於 Application.OnTime (TimeValue("08:45:00")), "Module1.Timer" ：至於 Timer 修改 ...
c_c_lai 發表於 2012-6-8 08:07

感謝c_c_lai 大大的熱心回覆
先試試看
感恩