- 帖子
- 65
- 主題
- 0
- 精華
- 0
- 積分
- 120
- 點名
- 0
- 作業系統
- Win 7
- 軟體版本
- Office 2010
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-5-15
- 最後登錄
- 2010-7-16
|
【個人經驗】因有可能9:00事件觸發時,同時開了多個Excel files & Activeworkbook並不是此欲執行的檔案而導致執行錯誤問題,因此在Private Sub MyWork()
開始處加一判斷式並指定Activeworkbook就可避免執行錯誤問題了。
For Each wb In Workbooks
If InStr(wb.Name, "*****") > 0 Then '*****->Excel檔名
wb.Activate
.
.
.
End If
Next |
|