Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Ocorre imediatamente antes de a edição ser ativada no documento na janela Vista Protegida especificada.
Sintaxe
expression.
ProtectedViewWindowBeforeEdit( _PvWindow_ , _Cancel_ )
expressão Uma expressão que devolve um objeto Aplicação .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| VaWindow | Obrigatório | ProtectedViewWindow | A janela Vista Protegida que contém o documento que está ativado 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 seguinte pede ao utilizador uma resposta sim ou não antes de ativar a edição num documento numa janela vista 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 fazê-lo, veja Utilizar eventos com o objeto Aplicação.
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
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.