Compartilhar via


Evento Explorer.Activate (Outlook)

Ocorre quando um objeto Explorer torna-se a janela ativa como resultado de uma ação do usuário ou de um código de programa.

Sintaxe

expressão. Ativar

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

Este exemplo de código usa a propriedade WindowState para maximizar a janela do explorer superior, quando o evento Activate ocorre. O código de exemplo deve ser colocado em um módulo de classe e a rotina Initialize_handler deve ser chamada antes que o procedimento de evento pode ser chamado pelo Microsoft Outlook.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Public Sub Initialize_handler() 
 
 Set myOlExp = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExp_Activate() 
 
 If myOlExp.WindowState = olNormalWindow Then _ 
 
 myOlExp.WindowState = olMaximized 
 
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.