Word VBA教程:使用 Application对象事件

若要创建Application对象事件的事件处理器,需要完成下列三个步骤:

  1. 在类模块中声明对应于事件的对象变量。
  2. 编写指定事件的过程。
  3. 从其他模块中初始化已声明的对象。

声明对象变量

在为 Application对象事件编写过程之前,必须创建新的类模块并声明一个包含事件的 Application 类型对象。例如,假定已创建新的类模块并命名为 EventClassModule。该类模块包含下列代码:


Public WithEvents App As Word.Application

编写事件过程

定义了包含事件的新对象后,它将出现在类模块的“对象”下拉列表框中,然后可为新对象编写事件过程。(在“对象”框中选定新对象后,用于该对象的有效事件将出现在“过程”下拉列表框中)从“过程”下拉列表框中选择一个事件,在类模块中会增加一空过程。


Private Sub App_DocumentChange()
End Sub

初始化已声明的对象

在运行过程之前,必须将类模块中已声明的对象(本例中为 App)连接到 Application对象。您可在任何模块中使用下列代码:


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

运行 Register_Event_Handler 过程。运行该过程后,类模块中的 App对象指向 Microsoft Word Application对象,当事件发生时,将运行类模块中的事件过程。

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号