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

Статья
04/07/2023

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

Примечание.

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

Синтаксис

Частное вложенное выражение "DocumentBeforeClose** (Doc As Document**, Cancel As Boolean)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Док	Обязательный	Документ	Документ, который закрывается.
Отмена	Обязательный	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 и обратная связь.

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