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

Чтобы создать обработчик событий для события объекта Application , необходимо выполнить следующие три шага:

  1. Объявите переменную объекта в модуле класса для реагирования на события.

  2. Напишите конкретные процедуры событий.

  3. Инициализация объявленного объекта из другого модуля.

Объявление переменной объекта

Перед написанием процедур для событий объекта Application необходимо создать новый модуль класса и объявить объект типа Application с событиями. Например, предположим, что создан новый модуль класса с именем EventClassModule. Новый модуль класса содержит следующий код.

Public WithEvents App As Word.Application

Написание процедур событий

После объявления нового объекта с событиями он появится в раскрывающемся списке Объект в модуле класса, и для нового объекта можно написать процедуры событий. (При выборе нового объекта в поле Объект допустимые события для этого объекта отображаются в раскрывающемся списке Процедура .) Выберите событие в раскрывающемся списке Процедура ; в модуль класса добавляется пустая процедура.

Private Sub App_DocumentChange() 
 
End Sub

Инициализация объявленного объекта

Перед выполнением процедуры необходимо подключить объявленный объект в модуле класса (приложение в этом примере) с объектом Application . Это можно сделать с помощью следующего кода из любого модуля.

Dim X As New EventClassModule 
Sub Register_Event_Handler() 
 Set X.App = Word.Application 
End Sub

Выполните процедуру Register_Event_Handler. После выполнения процедуры объект App в модуле класса указывает на объект Microsoft Word Application , а процедуры событий в модуле класса будут выполняться при возникновении событий.

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

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