Evento Application.XMLSelectionChange (Word)

Este evento se produce cuando cambia el nodo XML primario de la selección actual.

Sintaxis

expresión. XMLSelectionChange'(Sel**, OldXMLNode, NewXMLNode, Reason)

Expresión Variable que representa un objeto "Application" que se ha declarado en un módulo de clase mediante la palabra clave WithEvents . Para obtener más información sobre el uso de eventos con el objeto Application , consulte Uso de eventos con el objeto Application.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Sel Obligatorio Selection Texto seleccionado, incluidos los elementos XML. Si no se ha seleccionado ningún texto, el parámetro Sel devuelve Nothing o bien devuelve el primer carácter situado a la derecha del punto de inserción.
OldXMLNode Obligatorio XMLNode Nodo XML desde el que se mueve el punto de inserción.
NewXMLNode Obligatorio XMLNode Nodo XML al que se mueve el punto de inserción.

Ejemplo:

En el siguiente ejemplo, se valida un elemento XML recién agregado al insertar un elemento nuevo en el 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

Vea también

Objeto Application

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.