如何调用Initialize_Handler()例程

hlssoft · 发表于 2012-9-24 08:22

本帖最后由 hlssoft 于 2012-9-24 08:24 编辑

在outlook帮助里关于forward事件有如下一段说明和代码：
示例代码必须位于类模块（如 ThisOutlookSession）中，并且在 Microsoft Outlook 调用该事件过程前必须调用 Initialize_Handler() 例程。
相关的代码如下：
Public WithEvents myItem As Outlook.MailItemPublic
Sub Initialize_Handler()
  Set myItem = Application.ActiveInspector.CurrentItem
End Sub
Private Sub myItem_Forward(ByVal Forward As Object, Cancel As Boolean)
  If myItem.Subject = "Do not forward" Then
MsgBox "You may not forward this message!"
Cancel = True
  End If
End Sub
问题1、ThisOutlookSession就是类模块吗？还是要另插入类模块？
问题2、如何先调用Initialize_Handler()例程？
本人初学VBA,几经查找也没有看到恰当的解释，请明白的热心人给个帮助，先谢谢了！

dsd999 · 发表于 2012-9-25 11:10

在Application_Startup里调用应该就可以。

hlssoft · 发表于 2012-9-25 13:50

这版块人气差点，都是版主出面回答，谢谢了！
另外，ThisOutlookSession是类模块吗？

dsd999 · 发表于 2012-9-25 15:19

hlssoft 发表于 2012-9-25 13:50
这版块人气差点，都是版主出面回答，谢谢了！
另外，ThisOutlookSession是类模块吗？

可以这么理解。

hlssoft · 发表于 2012-9-25 16:39

再次感谢！

		自动登录	找回密码
密码			免费注册

[求助] 如何调用Initialize_Handler()例程