.acsauto 스크립트를 사용하여 Excel 응용 프로그램을 열고 매크로를 호출합니다.

Question

매일 아침 Avaya CMS Supervisor 스크립트 파일 (.acsauto)을 사용하여 매우 간단한 Excel 파일을 생성 한 다음 컴파일 할 때 사용할 수있는 다른 매크로가있는 Excel 파일이 있습니다. 여러 파일의 데이터를 멋진보고보기로

나는 acsauto 파일이 시각적 인 기본으로 작성된 것을 알아 냈으므로 스크립트 끝 부분에 추가하여 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") 

다른 부분은 어떤 as something 부분없이 Dim 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")