通过

OutlookBarPane.BeforeNavigate 事件 (Outlook)

  • 项目

用户单击 "快捷方式" 窗格中的快捷方式以导航到另一个文件夹时发生此事件。

语法

expression。 BeforeNavigate( _Shortcut_ , _Cancel_ )

表达 一个代表“OutlookBarPane”对象的变量。

参数

名称 必需/可选 数据类型 说明
Shortcut 必需 OutlookBarShortcut 用户单击的快捷方式。
Cancel 必需 Boolean 假 的事件发生时。 如果事件过程将此参数设置为 True ，则不会更改当前的文件夹。

备注

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

示例

此 Microsoft Visual Basic for Applications (VBA) 示例禁止用户使用 "快捷方式" 窗格打开 "便笺" 文件夹。 示例代码必须放在类模块中，并且在 Microsoft Outlook 调用该事件过程前必须调用 Initialize_handler 例程。 如果还没有 Notes 文件夹的快捷方式，则需要创建一个以运行此示例。

Public WithEvents myOlPane As Outlook.OutlookBarPane 
 
 
 
Public Sub Initialize_handler() 
 
 Set myOlPane = Application.ActiveExplorer.Panes.Item("OutlookBar") 
 
End Sub 
 
 
 
Private Sub myOlPane_BeforeNavigate(ByVal Shortcut As Outlook.OutlookBarShortcut, Cancel As Boolean) 
 
 If Shortcut.Name = "Notes" Then 
 
 MsgBox "You cannot view the Notes folder." 
 
 Cancel = True 
 
 End If 
 
End Sub

另请参阅

OutlookBarPane 对象

支持和反馈

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