推 ghostfarmer:已經可以正常執行 謝謝 06/17 16:10
※ 引述《ghostfarmer ()》之銘言：
: ※ 引述《ghostfarmer ()》之銘言：
: : 我改成這樣
: : Shell ("C:\Program Files\Microsoft_
: : Office\OFFICE11\Library\Analysis\ATPVBAEN.XLA",vbNormalFocus)
: : 可是為什麼他說 必須是=
: 不論我改成前面加CALL 或是 把前後括號拿掉
: 執行都出現
: 執行階段錯誤'5':
: 程序呼叫或引數不正確
: 偵錯 shell 那行是黃的
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA"
(ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String,
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As
Long) As Long
ShellExecute 0, "", "c:\123.xla", "", "", 5
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 163.26.228.44