未知運行時錯誤VB

-1

我有一個VB腳本在Excel文件中運行宏。代碼運行並正確生成結果文件。未知運行時錯誤VB

Excel宏運行正常。我得到一個錯誤的VB代碼說， '未知的運行時錯誤' 後 '代碼800A9C68' '線8''Char 2'

代碼：

Dim xlApp, xlBook 
Set xlApp = CreateObject("Excel.Application") 
xlApp.DisplayAlerts = False 
Set xlBook = xlApp.Workbooks.Open("Z:\Confidential Restricted\Weekly_HR_Employees_Macro.xlsm", False) 

'msgbox("3") 

xlApp.Run "Weekly_HR_Employees_Macro.Weekly_HR_Employees_Macro" 

'xlbook.Save 
'xlBook.Close False 
'set xlBook = Nothing 

xlApp.Quit 
'Set xlApp = Nothing

來源

2017-02-23 E_McAndrew

看一下重複，你需要檢查你是否還有其他excel進程在運行，這是錯誤'800A9C68'的原因。 – Lankymart

嘗試下面的VBScript：

Option Explicit 

Dim xlApp, xlBook 
Set xlApp = CreateObject("Excel.Application") 

set xlBook = xlApp.Workbooks.Open("Z:\Confidential Restricted\Weekly_HR_Employees_Macro.xlsm",0, False) 
xlApp.Run "Weekly_HR_Employees_Macro" 
xlBook.Close True 
xlApp.Quit 

set xlBook = Nothing 
Set xlApp = Nothing

來源

2017-02-23 12:43:07

我現在得到一個錯誤，說第二行所需的對象？ –

@E_McAndrew您的文件「Weekly_HR_Employees_Macro.xlsm」中是否有「Sub Weekly_HR_Employees_Macro」？確切的名字 –

是的，我確實。該腳本的作品，我只是不想要錯誤消息 –

未知運行​​時錯誤VB

回答

相關問題

未知運行時錯誤VB