Application.XMLSelectionChange Event (Word)
Occurs when the parent XML node of the current selection changes.
Syntax
Private Sub expression _XMLSelectionChange(Sel, OldXMLNode, NewXMLNode, Reason)
expression A variable that represents an Application object that has been declared in a class module by using the WithEvents keyword. For more information about using events with the Application object, see Using Events with the Application Object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Sel |
Required |
Selection |
The text selected, including XML elements. If no text is selected, the Sel parameter returns either nothing or the first character to the right of the insertion point. |
OldXMLNode |
Required |
XMLNode |
The XML node from which the insertion point is moving. |
NewXMLNode |
Required |
XMLNode |
The XML node to which the insertion point is moving. |
Example
The following example validates a newly added XML element when a new element is inserted into the document.
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