.acsauto скрипт для открытия приложения Excel и вызова макроса

Question

Каждое утро я использую файл сценария Supervisor Avaya CMS Supervisor (.acsauto), чтобы сгенерировать кучу очень простых файлов 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, поэтому я не очень-то ближе к решению.

Любые предложения были бы с удовольствием приняты.

Edit: Это работало вместо ...

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")