Share via


Événement Explorer.ViewSwitch (Outlook)

Survient lorsque l'affichage de l'explorateur change, à la suite d'une action de l'utilisateur ou par le biais d'un code de programme.

Syntaxe

expression. ViewSwitch

Expression Variable qui représente un objet Explorer .

Remarques

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

Exemple

Cet exemple Visual Basic pour Applications (VBA) montre comment masquer le volet de visualisation, s’il est visible, lorsque l’utilisateur bascule vers l’affichage Messages avec aperçu partiel. 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.

Dim WithEvents myOlExpl As Outlook.Explorer 
 
 
 
Sub Initialize_handler() 
 
 Set myOlExpl = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExpl_ViewSwitch() 
 
 If myOlExpl.CurrentView = "Messages with AutoPreview" And myOlExpl.IsPaneVisible(olPreview) = True Then 
 
 myOlExpl.ShowPane olPreview, False 
 
 End If 
 
End Sub

Voir aussi

Explorer, objet

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.