Evento Application.XMLSelectionChange (Word)
Ocorre quando o nó XML pai da seleção atual é alterado.
Sintaxe
expressão. XMLSelectionChange'(Sel**, OldXMLNode, NewXMLNode, Reason)
Expressão Uma variável que representa um objeto 'Application' que foi declarado em um módulo de classe usando a palavra-chave WithEvents . Para obter mais informações sobre como usar eventos com o objeto Application , consulte Usando eventos com o objeto Application.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Sel | Obrigatório | Selection | O texto selecionado, incluindo elementos XML. Se nenhum texto estiver selecionado, o parâmetro Sel retorna o primeiro caractere à direita do ponto de inserção ou não retorna nada. |
OldXMLNode | Obrigatório | XMLNode | O nó XML a partir do qual o ponto de inserção está se movendo. |
NewXMLNode | Obrigatório | XMLNode | O nó XML até o qual o ponto de inserção está se movendo. |
Exemplo
O exemplo a seguir valida um elemento XML recém-adicionado quando um novo elemento é inserido no documento.
Private Sub Wrd_XMLSelectionChange(ByVal Sel As Selection, _
ByVal OldXMLNode As XMLNode, ByVal NewXMLNode As XMLNode, _
Reason As Long)
Dim intResponse As Integer
If Reason = wdXMLSelectionChangeReasonInsert Then
If Not NewXMLNode Is Nothing Then
NewXMLNode.Validate
End If
End If
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.