Compartilhar via


Evento Explorer.BeforeMaximize (Outlook)

Ocorre quando um objeto Explorer é maximizado pelo usuário.

Sintaxe

expression. BeforeMaximize( _Cancel_ )

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Cancel Obrigatório Boolean False quando o evento ocorre. Se o procedimento de evento define este argumento como True, a operação não será concluída e o explorer não estiver maximizado.

Comentários

Esse evento pode ser cancelado depois de iniciado.

Exemplo

O exemplo a seguir do Microsoft Visual Basic for Applications (VBA) exibe uma mensagem de aviso para o usuário antes de maximizar a janela atual. Se o usuário clicar em Sim, o gerenciador será maximizado. O código de exemplo deve ser colocado em um módulo de classe como ThisOutlookSession, e a Initialize_Handler() sub-rotina deve ser chamada antes que o procedimento de evento possa ser chamado pelo Microsoft Outlook.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Sub Initialize_Handler() 
 
 Set myOlExp = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExp_BeforeMaximize(Cancel As Boolean) 
 
'Prompts the user before maximizing the explorer 
 
 
 
 Dim lngAns As Long 
 
 
 
 lngAns = MsgBox("Are you sure you want to maximize the current window?", vbYesNo) 
 
 If lngAns = vbYes Then 
 
 Cancel = False 
 
 Else 
 
 Cancel = True 
 
 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.