Excel宏手动运行,但不是以VBScript

时间:2017-11-30 19:20:00

标签: excel excel-vba vbscript vba

我在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

0 个答案:

没有答案