返回列表下一主題上一主題發帖

[發問] 多個巨集，自動化問題

spermbank

中學生 Rank: 2

帖子: 94
主題: 28
精華: 0
積分: 145
點名: 0
作業系統: windows
軟體版本: office 2007
閱讀權限: 20
註冊時間: 2011-9-22
最後登錄: 2025-2-25

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2012-10-24 01:36 | 顯示全部帖子

[發問] 多個巨集，自動化問題

大家好:
程式大致上為
Sub 程式1()
...
Application.OnTime Now + TimeValue("00:00:10"), "程式2"
Sub End
Sub 程式2()
...
Application.OnTime Now + TimeValue("00:00:10"), "程式3"
Sub End

Sub 程式3()
Sub End

執行程式1-X個巨集約2分鐘

Sub 程式4()
Sub End

執行程式4約1分鐘

Sub 程式5()
Sub End

執行程式5約1分鐘

Sub 程式6()
Sub End

執行程式6約8分鐘

Sub 自動化()
程式1
程式4
程式5
程式6
Sub End

為什麼我利用自動化巨集來執行程式1、4-6
照道理說應該會是程式1跑完才會執行程式4及陸續執行程式5和6
可是問題來了
程式1未跑完就執行程式4-5

實在找不出原因
請各位大大指教