.acsauto脚本打开Excel应用程序并调用宏

Question

每天早上，我使用Avaya CMS Supervisor脚本文件（.acsauto）生成一堆非常简单的Excel文件，然后使用另一个启用宏的Excel文件编译将多个文件的数据整合到一个漂亮的报告视图中。

我注意到acsauto文件是用visual basic编写的，所以我一直在试着看看我是否可以添加到该脚本的末尾，让它继续前进，并为我打开xlsm文件并调用宏编译一切。不幸的是我得到“预期语句的结束”的错误消息，在开始这一行：

Dim xlApp as Excel.Application 
Set xlApp = New Excel.Application 
xlApp.Visible = true 
xlApp.Application.Workbooks.Open ("C:\folders\file name.xlsm") 
xlApp.Application.Run ("'file name.xlsm'!MacroName") 

脚本的其他部分有Dim something没有任何as something一部分，所以我试图消除在本节as Excel.Application了。之后，脚本不会抛出任何错误，但它也不会打开Excel，所以我没有更接近解决方案。

任何建议将很乐意收到。

编辑： 这个工作，而不是...

Dim xlApp 
Set xlApp = CreateObject("Excel.Application") 
xlApp.Visible = true 
xlApp.Application.Workbooks.Open ("C:\folders\file name.xlsm") 
xlApp.Application.Run ("'file name.xlsm'!MacroName") 

Answer 1

Dim xlApp 
Set xlApp = CreateObject("Excel.Application") 
xlApp.Visible = true 
xlApp.Application.Workbooks.Open ("C:\folders\file name.xlsm") 
xlApp.Application.Run ("'file name.xlsm'!MacroName")