Compartilhar via


Explorer. Evento 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 tem de ser colocado num módulo de classe, como ThisOutlookSession, e a Initialize_Handler() subrreplicação deve ser chamada antes de o procedimento do evento poder 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.