Вызов Excel VBA из Word

Question

У нас есть стандартная форма в MS Word, чтобы вручную заполнить детали и запустить макрос. Этот макрос откроет регистр MS Excel, чтобы автоматически заполнять его из полей в документе Word при выполнении других действий.

В текущем решении имеется комбинация клавиш для макроса в электронной таблице Excel, а макрос документа Word отправляет нажатия клавиш в открытую электронную таблицу Excel для запуска макроса. Это работает только для нескольких человек в офисе.

Могу ли я вызывать свой макрос Excel напрямую из макроса Word, когда моя электронная таблица Excel находится в фокусе, или есть параметр Windows, который блокирует мои клавиши отправки для запуска макроса?

Answer 1

Это всего лишь догадка, но можно ли будет перенести макрос Excel из электронной таблицы Excel в документ Word?Затем вы можете добавить немного кода для запуска правильной электронной таблицы Excel и выполнения необходимых полевых манипуляций.Итак, в основном, пусть ваш документ Word выполняет всю работу с электронной таблицей Excel.

Кроме того, вы можете выполнить процедуру, описанную здесь:

http://support.microsoft.com/kb/177760

Вотсоответствующий код листинга:

 Sub XLTest()

     Dim XL as Object

     Set XL = CreateObject("Excel.Application")

     XL.Workbooks.Open "C:\My Documents\ExcelFile.xls"

     ' If there is more than one macro called TestMacro,
     ' the module name would be required as in
     '
     ' XL.Run "Module1.TestMacro"
     '
     ' to differentiate which routine is being called.
     '
     XL.Run "TestMacro"

End Sub