Compartilhar via


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

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.