Evento Application.ProtectedViewWindowBeforeClose (Excel)

Ocorre imediatamente antes de uma janela no Modo de Exibição Protegido ou uma pasta de trabalho em uma janela no Modo de Exibição Protegido ser fechada.

Sintaxe

expressão. ProtectedViewWindowBeforeClose (Pvw, Reason, Cancel)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Pvw	Obrigatório	ProtectedViewWindow	Um objeto que representa a janela Modo de Exibição Protegido que está fechada.
Motivo	Obrigatório	XlProtectedViewCloseReason	Uma constante que especifica o motivo pelo qual a janela Exibição Protegida está fechada.
Cancel	Obrigatório	Boolean	False quando o evento ocorre. Se o procedimento de evento define este argumento como True, a janela não fechará quando o procedimento for concluído.

Valor de retorno

Nada

Exemplo

O exemplo de código a seguir solicita ao usuário resposta afirmativa ou negativa antes de fechar a janela Modo de Exibição Protegido. Esse código deve ser colocado em um módulo de classe e uma instância dessa classe deve ser inicializada corretamente.

Para obter mais informações sobre como usar procedimentos de evento com o objeto Application , consulte Usando eventos com o objeto Application.

Private Sub App_ProtectedViewWindowBeforeClose(ByVal Pvw as ProtectedViewWindow, _ 
 Reason as XlProtectedViewCloseReason, Cancel as Boolean) 
 a = MsgBox("Do you really want to close the Protected View window?", _ 
 vbYesNo) 
 If a = vbNo Then Cancel = True 
End Sub

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.