Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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
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.