Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Когда сохраняю созданный документ по шаблону, word подставляет в имя документа, то что находится в первой строчке документа. Как мне научить word предлагать имена в зависимости от того что находится в свойствах документа. Например если в документе заполняют свойство Автор, то что бы та мне написали, это будет предложено в качестве имени.
Можно в шаблон прописать макросы перехвата событий открытия и закрытия:
Private Sub Document_Open()
Private Sub Document_Close()
Будут срабатывать на все документы, созданные на основе шаблона, и на сам шаблон.
Есть еще
Private Sub Document_New()
А в макрос прописать изменение имени документа по свойству...
А в макрос прописать изменение имени документа по свойству...
А можно подробнее?
Что-то типа
Private Sub Document_Close()
On Error Resume Next
If ActiveDocument Is ThisDocument Then Exit Sub ' это сам шаблон
If ActiveDocument.Saved Then Exit Sub ' уже сохранен
' свойство "Автор"
Dim S$
S = ActiveDocument.BuiltInDocumentProperties(Word.wdPropertyAuthor).Value
If Len(S) <= 0 Then Exit Sub
' диалог
Dim D As Word.Dialog
Set D = Dialogs(Word.wdDialogFileSaveAs)
D.Name = S
D.Show
End SubСтраницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться