Événement Explorer.BeforeViewSwitch (Outlook)
Survient avant que l'explorateur bascule vers un nouvel affichage, à la suite d'une action de l'utilisateur ou par le biais d'un code de programme.
Syntaxe
expression. BeforeViewSwitch( _NewView_ , _Cancel_ )
Expression Variable qui représente un objet Explorer .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| NewView | Requis | Variant | Nom de l'affichage vers lequel bascule l'explorateur. |
| Cancel | Obligatoire | Booléen | False lorsque l'événement se produit. Si la procédure événementielle affecte à cet argument la valeur True, le basculement est annulé et l'affichage 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 confirmer que l’utilisateur souhaite basculer entre les affichages et comment annuler le déplacement si l’utilisateur répond par la négative. 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.
Public WithEvents myOlExp As Outlook.Explorer
Public Sub Initialize_handler()
Set myOlExp = Application.ActiveExplorer
End Sub
Private Sub myOlExp_BeforeViewSwitch(ByVal NewView As Variant, Cancel As Boolean)
Dim Prompt As String
Prompt = "Are you sure you want to switch to the " & NewView & " view?"
If MsgBox(Prompt, vbYesNo + vbQuestion) = vbNo Then Cancel = True
End Sub
Voir aussi
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.