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


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

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

Public WithEvents App As Application

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

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

Пример

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

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

См. также

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

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