Outlook VBA教程:SelectionChange事件

在当前视图的选择更改时发生。其他选择的更改(例如选定的文件夹)不会引起该事件的发生。此外,如果当前文件夹是文件系统文件夹,或者显示了“Outlook 今日”或当前 Web 视图中的任何文件夹,则该事件也不会发生。该事件在 VBScript 中不可用。

Sub object_SelectionChange()

object  该表达式的值为Explorer对象。

VBA示例

本示例更改名为 Form1 的窗体的标题来显示顶层浏览器窗口中选定项目的数目。示例代码必须放在类模块中,并且在 Microsoft Outlook 调用该事件过程前必须调用Initialize_handler 例程。


Dim myOlApp As Outlook.Application
Public WithEvents myOlExp As Outlook.Explorer
Public Sub Initialize_handler()
    Set myOlExp = myOlApp.ActiveExplorer
End Sub
Private Sub myOlExp_SelectionChange()
    Form1.Caption = myOlExp.Selection.Count & " items selected."
End Sub

上页:Outlook VBA教程:ReplyAll事件 下页:Outlook VBA教程:Send事件

Outlook VBA教程:SelectionChange事件:相关链接

Outlook VBA教程:Send事件 Outlook VBA教程:ShortcutAdd事件
Outlook VBA教程:Snooze事件 Outlook VBA教程:Startup事件
Outlook VBA教程:SyncEnd事件 Outlook VBA教程:SyncStart事件
Outlook VBA教程:ViewAdd事件 Outlook VBA教程:ViewRemove事件
Outlook VBA教程:ViewSwitch事件 Outlook VBA教程:Write事件
Outlook VBA教程:隐藏的语言元素 Outlook VBA教程:新增事件(按字母顺序排列)
Outlook VBA教程:新增事件(按对象排列) Outlook VBA教程:新增方法(按字母顺序排列)
Outlook VBA教程:新增方法(按对象排列) Outlook VBA教程:新增对象
Outlook VBA教程:新增属性(按字母顺序排列) Outlook VBA教程:新增属性(按对象排列)
Outlook VBA教程:Outlook 项目对象 Outlook VBA教程:OLE 程序标识符
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号