通过

OutlookBarGroups.BeforeGroupRemove 事件 (Outlook)

  • 项目

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

语法

expression。 BeforeGroupRemove( _Group_ , _Cancel_ )

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

参数

名称 必需/可选 数据类型 说明
Group 必需 OutlookBarGroup 正在删除 OutlookBarGroup 。
Cancel 必需 Boolean 假 的事件发生时。 如果事件过程将此参数设置为 True ，则不从 快捷方式窗格中删除该组。

备注

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

示例

此 Microsoft 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_BeforeGroupRemove(ByVal Group As OutlookBarGroup, Cancel As Boolean) 
 Cancel = True 
End Sub

另请参阅

OutlookBarGroups 对象

支持和反馈

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