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

Использование событий с объектом Document (издатель)

  • Статья

Объект Document поддерживает семь событий: BeforeClose, Open, Redo, ShapesAdded, ShapesRemoved, Undo и WizardAfterChange. Процедуры для реагирования на эти события записываются в модуле класса ThisDocument.

Чтобы создать процедуру события, выполните следующие действия.

  1. Под проектом публикации в окне обозревателя проектов дважды щелкните ThisDocument. В представлении папокобъект ThisDocument находится в папке Объекты издателя Майкрософт .

  2. Выберите Документ в раскрывающемся списке Объект .

  3. Выберите событие в раскрывающемся списке Процедура . В модуль класса добавляется пустая подпрограмма.

  4. Добавьте инструкции Visual Basic, которые необходимо выполнить при возникновении события.

Пример

В этом примере показана процедура события Open , которая отображает сообщение при открытии публикации.

Private Sub Document_Open() 
    MsgBox "This publication is copyrighted." 
End Sub

В следующем примере показана процедура события BeforeClose , которая запрашивает у пользователя ответ "да" или "нет" перед закрытием документа.

Private Sub Document_BeforeClose(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

Примечание.

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

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

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