Событие Application.DocumentBeforeClose (Word)

Происходит непосредственно перед закрытием любого открытого документа.

Примечание.

Если вы работаете с документом, внедренным в другой документ, это событие не возникает.

Синтаксис

Закрытое вложенное выражение 'DocumentBeforeClose** (Doc As Document**, Cancel As Boolean)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Док	Обязательный	Document	Закрываемый документ.
Отмена	Обязательный	Boolean	При возникновении события значение false. Если процедура обработки событий устанавливает для этого аргумента значение True, документ не закрывается после завершения процедуры.

Примечания

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

Пример

В этом примере пользователю предлагается ответить "да" или "нет" перед закрытием любого документа. Этот код должен быть помещен в модуль класса, а экземпляр класса должен быть правильно инициализирован, чтобы увидеть работу этого примера; инструкции по выполнению этой операции см. в разделе Использование событий с объектом Application .

Public WithEvents appWord as Word.Application 
 
Private Sub appWord_DocumentBeforeClose _ 
        (ByVal Doc As Document, _ 
        Cancel As Boolean) 
 
    Dim intResponse As Integer 
 
    intResponse = MsgBox("Do you really " _ 
        & "want to close the document?", _ 
        vbYesNo) 
 
    If intResponse = vbNo Then Cancel = True 
End Sub

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

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