Использование событий с объектом 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 и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по