麻辣家族討論版版 - Powered by Discuz! Board

標題: 自動開啟excel檔案 [打印本頁]

作者: lone_tiger0303 時間: 2011-1-23 10:10 標題: 自動開啟excel檔案

剛在討論區看到版主GBKEE寫到，要在指定時間開啟EXCEL檔案程式寫法：
『將程序複製到ThisWorkbook 模組存檔後
重新開啟一次檔案即可
Private Sub Workbook_Open()
Application.OnTime TimeValue("09:00"), "thisworkbook.mywork"
End Sub 』
我將其貼到ThisWorkbook 模組後怎都無反應
請各位前輩指點迷津，謝謝

作者: GBKEE 時間: 2011-1-23 17:09

本帖最後由 GBKEE 於 2011-1-23 17:11 編輯

回復 1# lone_tiger0303
重新開啟的時間需小於(早於) TimeValue("09:00")
mywork 程序也須在ThisWorkbook模組內

作者: lone_tiger0303 時間: 2011-1-24 12:29

GBKEE 我傳個檔案請您幫我看看~~謝謝

作者: GBKEE 時間: 2011-1-24 16:54

回復 lone_tiger0303
重新開啟的時間需小於(早於) TimeValue("09:00")
mywork 程序也須在ThisWorkbook模 ...
GBKEE 發表於 2011-1-23 17:09

Private Sub Workbook_Open()
Application.OnTime TimeValue("12:30"), "thisworkbook.mywork"
End Sub
thisworkbook 模組內的mywork程序

[attach]4510[/attach]

作者: lone_tiger0303 時間: 2011-1-24 17:28

那.....小弟這檔案這樣正確嗎

作者: GBKEE 時間: 2011-1-25 18:41

回復 5# lone_tiger0303
Application.OnTime TimeValue("12:30"), "thisworkbook.mywork"
上式程式碼在TimeValue("12:30")時 ,執行 thisworkbook模組裡的mywork程序

你的附檔中thisworkbook模組裡,沒有mywork程序
你的附檔中thisworkbook模組裡,沒有mywork程序

作者: lone_tiger0303 時間: 2011-1-26 12:12

唉啊！對歐~~
那我直接說明需求好了，我希望在每天的早上0900時該檔案會自動打開，且必須開啟巨集
這樣要如何寫程式碼呢
要麻煩您解答了，謝謝

作者: Hsieh 時間: 2011-1-26 19:48

回復 7# lone_tiger0303

每天的早上0900時該檔案會自動打開
這需要利用WINDOWS的排程

開啟檔案要觸發某巨集
就用OPEN事件驅動該巨集
在一般模組
Sub Auto_Open()
被驅動巨集
End Sub
Sub 被驅動巨集()
MsgBox "被驅動了"
End Sub

作者: lone_tiger0303 時間: 2011-1-27 16:40

唉！說的也是！感謝各位幫忙

作者: lone_tiger0303 時間: 2011-1-27 18:43

再請教一下
當檔案開啟時會出現一個"安全性警告"視窗，必須按"啟動巨集"才能進入工作表！
有何方法可以直接執行上述動作直接啟動巨集進入工作表

作者: Hsieh 時間: 2011-1-27 19:29

回復 11# lone_tiger0303

安全性設為低

作者: lone_tiger0303 時間: 2011-1-28 12:48

測試OK~~感謝您的幫忙

作者: barrykuo 時間: 2014-7-18 12:42

再請教一下
當檔案開啟時會出現一個"安全性警告"視窗，必須按"啟動巨集"才能進入工作表！
有何方法可以直 ...
lone_tiger0303 發表於 2011-1-27 18:43

請問是不是"安全性層級"設定為"低"，就不會出現上述警告訊息，剛剛試一下，確實沒有出現警告訊息！

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