Поделиться через


Событие Document.New (Word)

Происходит при создании нового документа на основе шаблона. Процедура для события New будет выполняться только в том случае, если оно хранится в шаблоне.

Синтаксис

expression.**Private Sub Document_New'

Выражение Переменная, представляющая объект Document .

Замечания

Сведения об использовании событий с объектом Document см. в разделе Использование событий с объектом Document.

Пример

В этом примере пользователь спрашивает, следует ли сохранять все остальные открытые документы при создании нового документа на основе шаблона. (Эта процедура хранится в модуле класса ThisDocument шаблона, а не документа.)

Private Sub Document_New() 
 Dim intResponse As Integer 
 Dim strName As String 
 Dim docLoop As Document 
 
 intResponse = MsgBox("Save all other documents?", vbYesNo) 
 
 If intResponse = vbYes Then 
 strName = ActiveDocument.Name 
 For Each docLoop In Application.Documents 
 With docLoop 
 If .Name <> strName Then 
 .Save 
 End If 
 End With 
 Next docLoop 
 End If 
End Sub

См. также

Объект Document

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.