Application.Run "'Tirazy.xls'!Module1.mTest"
или
Application.Run "'d:\Tirazy\Tirazy.xls'!Module1.mTest"
Можно ли из Ворда вызвать процедуру Екселя?
В Ворде (в VBA) пытаюсь вызвать процедурку, которая сидит в екслеевской книге (она открыта в другом окне в фоне).
Пишется "не удается запустить указанный макрос". Можно ли его все же как-то запустить на выполнение?
Код:
Пишется "не удается запустить указанный макрос". Можно ли его все же как-то запустить на выполнение?
Используйте что-то вроде нижеопубликованного варианта.
Если книга действительно открыта :
----------------------------------------------------------
Если книга действительно открыта :
Код:
Dim iXLObj As Object
Set iXLObj = GetObject(, "Excel.Application")
iXLObj.Run "'Tirazy.xls'!Module1.mTest"
...
Set iXLObj = GetObject(, "Excel.Application")
iXLObj.Run "'Tirazy.xls'!Module1.mTest"
...
----------------------------------------------------------
Код:
Dim iXLObj As Object
Set iXLObj = GetObject("D:\Tirazy\Tirazy.xls", "Excel.Sheet")
iXLObj.Parent.Run "'Tirazy.xls'!Module1.mTest"
...
Set iXLObj = GetObject("D:\Tirazy\Tirazy.xls", "Excel.Sheet")
iXLObj.Parent.Run "'Tirazy.xls'!Module1.mTest"
...
Большущее спасибо!