Partager via


Événement OutlookBarPane.BeforeNavigate (Outlook)

Se produit lorsque l’utilisateur clique sur un raccourci dans le volet Raccourcis pour accéder à un autre dossier.

Syntaxe

expression. BeforeNavigate( _Shortcut_ , _Cancel_ )

Expression Variable qui représente un objet « OutlookBarPane ».

Parameters

Nom Requis/Facultatif Type de données Description
Raccourci Requis OutlookBarShortcut Raccourci sur lequel l'utilisateur a cliqué.
Cancel Obligatoire Booléen False lorsque l'événement se produit. Si la procédure événementielle affecte à cet argument la valeur True, le dossier actif ne change pas.

Remarques

Cet événement n'est pas disponible dans Microsoft Visual Basic Scripting Edition (VBScript).

Exemple

Cet exemple Microsoft Visual Basic pour Applications (VBA) montre comment empêcher l’utilisateur de se servir du volet Raccourcis pour ouvrir le dossier Notes. L’exemple de code doit être placé dans un module de classe et la Initialize_handler routine doit être appelée avant que la procédure événementielle puisse être appelée par Microsoft Outlook. Si vous n’avez pas encore de raccourci vers le dossier Notes , vous devez en créer un pour exécuter cet exemple.

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

Voir aussi

Objet OutlookBarPane

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.