返回列表 上一主題 發帖

自動開啟excel檔案

自動開啟excel檔案

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

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



請問是不是"安全性層級"設定為"低",就不會出現上述警告訊息,剛剛試一下,確實沒有出現警告訊息!
人生只有三天,只有活在今天最踏實

TOP

測試OK~~感謝您的幫忙

TOP

回復 11# lone_tiger0303

安全性設為低
學海無涯_不恥下問

TOP

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

TOP

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

TOP

回復 7# lone_tiger0303


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

開啟檔案要觸發某巨集
就用OPEN事件驅動該巨集
在一般模組
Sub Auto_Open()
   被驅動巨集
End Sub
Sub 被驅動巨集()
   MsgBox  "被驅動了"
End Sub
學海無涯_不恥下問

TOP

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

TOP

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

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

TOP

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

TOP

        靜思自在 : 君子立恆志,小人恆立志。
返回列表 上一主題