对 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 对象，并且类模块中的事件过程将在事件发生时运行。

另请参阅

• Excel 函数（按类别）

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。