- 帖子
- 127
- 主題
- 56
- 精華
- 0
- 積分
- 176
- 點名
- 0
- 作業系統
- win8
- 軟體版本
- office2003
- 閱讀權限
- 20
- 註冊時間
- 2013-1-24
- 最後登錄
- 2025-1-26
|
請問一下,我正在測試使用VBA開啟指定檔案,但當我測試開啟acrobat或line時,都可以正常開啟
但我測試開啟按鍵精靈時,他都會產生
執行階段錯誤'-2147024156(800702e4)'-
"Exec'方式(IWshShell3'物件)失敗
請問有什麼限制能開啟的檔案嗎??
為什麼無法執行??
Option Explicit
Sub Q_Sample044()
'Windows Script Host Object Model設定引用項目
Dim myWsh As IWshRuntimeLibrary.WshShell
Dim myExec As IWshRuntimeLibrary.WshExec
Dim myTimer As Single
Set myWsh = CreateObject("Wscript.Shell")
Set myExec = myWsh.Exec("C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\Acrobat.exe") '指定要啟動的應用程式
myTimer = Timer + 5 '指定結束時間
Do Until myTimer < Timer
DoEvents
Loop
myExec.Terminate
Set myExec = Nothing '釋放物件
Set myWsh = Nothing
End Sub |
|