我在excel中有一些宏可以正常运行,当我在excel中手动运行它们时,但是当我在VBScript中设置脚本时,Excel会给我一条错误消息并且宏会执行失败。有谁知道为什么会这样,以及可以做些什么来解决它? “Windows(”icecleared_oiloptions.xlsx“)下面的命令。激活”是excel指出需要调试的地方。
Sub Save_Close_TN()
'
' Save_Close_TN Macro
'
Windows("icecleared_oiloptions.xlsx").Activate
ActiveWorkbook.Save
ActiveWindow.Close
End Sub
以下代码是VBS的呼叫功能:
Dim objExcel, xlBook
Set objExcel = CreateObject("Excel.Application")
Set xlBook = objExcel.Workbooks.Open("Q:\GAS\Hub Pricing\ICE Oil Options\ICE
Dat to Excel.xlsm", 0, False)
ObjExcel.Application.Visible = True
objExcel.Application.Run "Module3.Save_Close_TN"
objExcel.Application.Run "Module2.SaveAs1"
xlBook.Save
xlBook.Close True
set xlBook = Nothing