VBS根本没有运行

时间:2016-03-02 21:09:26

标签: excel vbscript

我使用此vbscript触发宏在Excel中运行而不打开excel。

sub test()
Set fso = CreateObject("Scripting.FileSystemObject")
curDir = fso.GetAbsolutePathName(".")

Set myxlApplication = CreateObject("Excel.Application")
myxlApplication.Visible = False
Set myWorkBook = myxlApplication.Workbooks.Open("\\Mac\Home\Desktop\TEST.xlsm" ) 'Change to the actual workbook that has the Macro
myWorkBook.Application.Run "Module1.Macro1()" 'Change to the Module and Macro that contains your macro
myworkbook.save
myxlApplication.Quit
end sub

它没有像它应该的那样工作,宏没有运行,即使我将代码更改为:

myWorkBook.Application.Run "Module1.Macro1()"

到一些不存在的宏名称,这个vbs应该向我发送错误信息。但甚至没有错误消息显示出来。不确定为什么vbs没有运行,我只需双击vbs文件即可运行。

请注意, 即使我编码任何错误,它甚至不会有任何错误消息。这很奇怪

1 个答案:

答案 0 :(得分:1)

我是如此愚蠢地把sub test(),end sub in vbs,vbs无法识别代码。