У меня есть файл xlsm, который состоит из 12 модулей, и каждый модуль содержит несколько функций.Но мой первый модуль (Macro_Caller)
содержит 4 подпроцедуры, я хочу запускать их один за другим, как мне это сделать.Я попытался записать VBS-файл и bat-файл, чтобы сделать это, однако он не работает должным образом.
**VBS File Code**
Dim args, eApp
Set args = wscript.Arguments
set eApp = GetObject("Fiile_Path\Send Now Final.xlsm")
eApp.visible = True
eApp.Run = "Sub Procedure Name"
eApp.ActiveWorkbook.Save
eApp.ActiveWorkbook.close(0)
eApp.Quit
.Bat File Code
cscript SendNow.vbs "File_Path\Send Now Final.xlsm"