Событие OutlookBarPane.BeforeNavigate (Outlook)

Статья
04/07/2023

Происходит, когда пользователь щелкает ярлык в области Ярлыки для перехода к другой папке.

Синтаксис

выражение. BeforeNavigate( _Shortcut_ , _Cancel_ )

Выражение Переменная, представляющая объект OutlookBarPane.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Ярлык	Обязательный	OutlookBarShortcut	Ярлык, нажатый пользователем.
Отмена	Обязательный	Boolean	Значение false при возникновении события. Если процедура события задает этому аргументу значение True, текущая папка не изменяется.

Замечания

Это событие недоступно в Microsoft Visual Basic Scripting Edition (VBScript).

Пример

Этот пример Microsoft Visual Basic для приложений (VBA) запрещает пользователю использовать панель Ярлыки для открытия папки Заметки. Пример кода должен быть помещен в модуль класса, а подпрограмма должна быть вызвана Initialize_handler , прежде чем процедура события может быть вызвана Microsoft Outlook. Если у вас еще нет ярлыка к папке 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 и обратная связь.

Поделиться через