Как из Excel запустить макрос в Word

[HenryO]

Друзья, подскажите, как запустить из Excel другую процедуру, которая находится в Word?
Код ниже не дает результатов:

Sub WordApp()
Dim objDoc As Object

Set objDoc = GetObject(, "Word.Application")

objDoc.call Сохранение

End Sub

[Скрипт]

HenryO, команда "GetObject" работает с запущенной программой. У вас программа "Word" запущена во время работы макроса?

[HenryO]

Да, конечно, приложение запущено. Связь с этим файлом устанавливается, т.е., например, спокойно получается туда вставить какой-либо текст. Вот запустить Call надо как-то по-другому, наверное. VB ругается именно на "Сохранение". Как мне кажется, он пытается запустить процедуру в Excel (а там такой процедуры нет).

[DiemonStar]

Sub WordApp()
Dim objDoc As Object

Set objDoc = GetObject(, "Word.Application")

objDoc.Run "Сохранить"

End Sub

у меня такой код запускает макрос в документе word. единственно, макрос должен быть в отдельном модуле, а не в коде документа.

з.ы. объект Application в Word не знаком с методом call

[Скрипт]

HenryO, чтобы посмотреть синтаксис команды "Run" в программе "Word", в программе "Word", в VBA поставьте курсор на слово "Run" и нажмите клавишу "F1". Откроется справка, в которой есть примеры, как обращаться к процедурам программы "Word".

[HenryO]

Пробовал objDoc.Run "Сохранение" (и без кавычек тоже). Писал и в модуле проекта, и в модуле Normal.
И так тоже пробовал (ниже).

Sub WordApp()
Dim objDoc As Object

Set objDoc = GetObject(, "Word.Application")

objDoc.Run "'Отчеты март 2013.docm'!Module1.Сохранение"

End Sub

Все время выдает ошибку Run-time "Не удается запустить указанный макрос"

Макрос в ворде рабочий.

Sub Сохранение()
ThisDocument.SaveAs2 FileName:="C:\Users\hm\Desktop\Отче т344.pdf", fileformat:=wdFormatPDF
End Sub

[Скрипт]

Удалил сообщение.

[Казанский]

Да, чудеса творятся в Ворде!
Создал документ с макросом в Word2007, сохранил как DocWMacro.docm .
При запуске из Excel (или из окна Immediate самогО Ворда, неважно) работает:

application.run "Сохранение"
application.run "Module1.Сохранение"
application.run "'DocWMacro'!Module1.Сохранение"
application.run "'DocWMacro.doc'!Module1.Сохранение"
application.run "'ГЕНгнегнмц ку  кп'!Module1.Сохранение"
application.run "'78пп ?*ППп .doc'!Module1.Сохранение"
application.run "'DocWMacro.фффф'!Module1.Сохранение"

А при ПРАВИЛЬНОМ указании названия файла - НЕ РАБОТАЕТ:

application.run "'DocWMacro.docm'!Module1.Сохранение"

[Скрипт]

Значит вывод такой, что в программе "Word" в VBA-методе "Run" нельзя указывать путь и имя Word-документа, а нужно указывать только имя модуля и имя процедуры.

А пример из VBA-справки по методу "Run" содержит ошибку.

[HenryO]

Получилось наконец-то запустить макрос в Word-е. Не знаю почему, но первый код с объявлением переменной не заработал в итоге:

Sub WordApp()
Dim objDoc As Object

Set objDoc = GetObject(, "Word.Application")

objDoc.Run "Сохранение"

End Sub

Вместо этого заработал код без объявления какой-либо переменной:

Sub WordApp()

GetObject(, "Word.Application").Run "Сохранение"

End Sub