Chestnut, в предыдущем коде по недосмотру я оставил после отладки не те значения «strTemplateName» и «strDocumentName», что использовались в примерах ранее. Я поправил код.
Цитата Chestnut:
|
Не помог к сожалению предложенный вами вариант. »
|
Читайте, что было написано дальше:
Цитата Iska:
Если не сработает — раскомментируйте:
Код:  'MsgBox strDocumentName & " - " & .Name
запустите скрипт, дождитесь появления окна сообщения, нажмите в нём Ctrl-C и вставьте результат из буфера обмена сюда, обрамив его тэгом [code]. »
|
Жду результата.
Цитата Chestnut:
|
после редактирования(вставки инфы и закрытия). »
|
Ясно. Вставьте в модуль
ThisDocument шаблона документа (именно в модуль шаблона, а не документа!) — в примерах это «My Template.dotx» — следующий код:
Код:
Option Explicit
Private Sub Document_Close()
Me.Save
End Sub
