Explorer. Evento ViewSwitch (Outlook)

Ocorre quando o modo de exibição no explorer é alterado, como resultado de uma ação do usuário ou de um código de programa.

Sintaxe

expression. ViewSwitch

expressão Uma variável que representa um objeto Explorer.

Comentários

Esse evento não está disponível no Microsoft Visual Basic Scripting Edition (VBScript).

Exemplo

Esse exemplo do Visual Basic for Applications (VBA) ocultará o painel de visualização se ele estiver visível quando o usuário alternar para o modo de exibição Mensagens com AutoVisualização. O código de exemplo deve ser colocado em um módulo de classe e a rotina Initialize_handler deve ser chamada para que o Microsoft Outlook chame o procedimento de evento.

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

Confira também

Objeto Explorer

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.