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
Vaca	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 Vista 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. Este código tem de ser colocado num módulo de classe e uma instância dessa classe tem de ser inicializada corretamente.

Para obter mais informações sobre como utilizar procedimentos de eventos com o objeto Aplicação , veja Utilizar eventos com o objeto Aplicação.

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.