对 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 Application 对象,并且类模块中的事件过程将在事件发生时运行。
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈