標題: [發問] 開啟excel檔案後 ，倒數一段時間(或到了設定時間)即執行另一段程式的寫法 [打印本頁]

---

作者: ji12345678    時間: 2012-5-16 16:47     標題: 開啟excel檔案後 ，倒數一段時間(或到了設定時間)即執行另一段程式的寫法

[attach]10980[/attach]
Sub Workbook_open()
DoEvents  '？
'Application.OnTime "16:06:50", "StartTimer2", schedule:=True                 '設定時間觸發
Application.OnTime Now + TimeValue("00:00:05"), "StartTimer2", schedule:=True '到數觸發

End Sub
Sub StartTimer2()
MsgBox "資料複製結束"
End Sub

要寫一段測試程式，開啟excel檔案後 ，倒數一段時間(或到了設定時間)即執行另一段程式的寫法
可是一直出現錯誤訊息，請大大指教~~為什麼會這樣~~。謝謝
[attach]10980[/attach]


[attach]10981[/attach]

---

作者: register313    時間: 2012-5-16 17:05

回復 1# ji12345678

[attach]10984[/attach]
如圖,把
Sub StartTimer2()
MsgBox "資料複製結束"
End Sub
移至一般模組內

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)