OutlookBarGroups.BeforeGroupAdd 事件 (Outlook)

在将新组添加到 快捷方式窗格中,可以是用户操作或程序代码之前发生。

语法

expressionBeforeGroupAdd( _Cancel_ )

表达 一个代表 OutlookBarGroups 对象的变量。

参数

名称 必需/可选 数据类型 说明
Cancel 必需 Boolean 的事件发生时。 如果事件过程将此参数设置为 True ,则组将不添加到 快捷方式窗格中。

备注

该事件在 Microsoft Visual Basic Scripting Edition (VBScript) 中不可用。

示例

此 Visual Basic for Applications (VBA) 示例禁止用户在将组添加到 快捷方式窗格中。 示例代码必须放在 类模块(如 ThisOutlookSession)中,并且 Initialize_handler 必须先调用例程,然后 Outlook 才能调用事件过程。

Dim WithEvents myOlGroups As Outlook.OutlookBarGroups 
Dim myOlBar As Outlook.OutlookBarPane 
 
Sub Initialize_handler() 
 Set myOlBar = Application.ActiveExplorer.Panes.Item("OutlookBar") 
 Set myOlGroups = myOlBar.Contents.Groups 
End Sub 
 
Private Sub myOlGroups_BeforeGroupAdd(Cancel As Boolean) 
 Cancel = True 
End Sub

另请参阅

OutlookBarGroups 对象

支持和反馈

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