Share via


Evento Application.ProtectedViewWindowBeforeEdit (Word)

Ocorre imediatamente antes de a edição ser habilitada no documento na janela de Exibição Protegida especificada.

Sintaxe

expression. ProtectedViewWindowBeforeEdit( _PvWindow_ , _Cancel_ )

Expressão Uma expressão que retorna um objeto Application .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
PvWindow Obrigatório ProtectedViewWindow A janela Exibição Protegida que contém o documento habilitado para edição.
Cancel Obrigatório Boolean False quando o evento ocorre. Se o procedimento de evento define este argumento como True, a edição não estiver habilitado no documento.

Exemplo

O exemplo de código a seguir solicita ao usuário uma resposta sim ou não antes de habilitar a edição em um documento em uma janela Exibição Protegida. Este código deve ser colocado em um módulo de classe, e uma instância da classe deve ser inicializada corretamente para que este exemplo funcione. Para obter mais informações sobre como fazer isso, consulte Usando eventos com o objeto Application.

O exemplo pressupõe que você tenha declarado uma variável de aplicativo chamada MailMergeApp nas declarações gerais e tenha definido a variável com um valor igual ao do objeto Application do Word.

Private Sub App_ProtectedViewWindowBeforeEdit(ByVal PvWindow As ProtectedViewWindow, Cancel As Boolean) 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Do you really " _ 
 & "want to edit the document?", _ 
 vbYesNo) 
 
 If intResponse = vbNo Then Cancel = True 
End Sub

Confira também

Objeto de Aplicativo

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.