共用方式為


OutlookBarGroups.BeforeGroupRemove 事件 (Outlook)

會在從 [快捷方式 ] 窗格中移除新群組之前發生,可能是因為使用者動作或程式碼所造成。

語法

expressionBeforeGroupRemove( _Group_ , _Cancel_ )

表達 代表 OutlookBarGroups 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
Group 必要 OutlookBarGroup 正在移除的 OutlookBarGroup
Cancel 必要 布林值 False 事件發生時。 如果事件程序將此引數設定為 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 支援與意見反應