通过VBS执行宏后保存Excel工作簿失败，使用Windows脚本宿主错误代码80010100

Question

尝试自动执行此过程：打开Excel文件，执行Excel宏并保存＆amp;关闭Excel文件。我为此目的使用了VB脚本，下面是我的vbs的代码片段。一切都可以保存Excel文件，其中代码80010100引发了Windows脚本宿主错误（系统调用失败）。

编辑：宏的目的是从几个csv文件中读取并进行数据比较。

我猜想在运行宏之后，Excel对象的句柄会丢失，因此无法保存＆amp;关闭。

代码段：

Set objFSO = CreateObject("Scripting.FileSystemObject")
sCurPath = objFSO.GetAbsolutePathName(".")
Set xl = CreateObject("Excel.application")
Set xlBook = xl.Workbooks.Open(sCurPath & "\ODSTest.xlsm", 0, False)   
xlBook.Activate
xl.Application.Visible = True
'xl.Application.run "ODSTest.xlsm!Module1.ODSComparison"
xl.Run "ODSComparison"

xl.activeworkbook.Close True

'xlBook.Save
'xlBook.Close False

'FileName = xl.ActiveWorkbook.Name

'Me.Application.ActiveWorkbook.Close(True)

'Workbooks(xlBook.Path & "\" & xlBook.Name).Close(True)

'xlBook.Close(True)
'xl.DisplayAlerts = False        
'xl.activewindow.close
'xl.Quit