Событие Application.XMLSelectionChange (Word)

Происходит при изменении родительского XML-узла текущего выделенного фрагмента.

Синтаксис

expression. XMLSelectionChange'(Sel**, OldXMLNode, NewXMLNode, Reason)

выражение Переменная, представляющая объект Application, объявленный в модуле класса с помощью ключевое слово WithEvents. Дополнительные сведения об использовании событий с объектом Application см. в разделе Использование событий с объектом Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Sel	Обязательный	Selection	Выделенный текст, включая XML-элементы. Если текст не выделен, параметр Sel возвращает либо ничего, либо первый символ справа от точки вставки.
OldXMLNode	Обязательный	XMLNode	Узел XML, из которого перемещается точка вставки.
NewXMLNode	Обязательный	XMLNode	Узел XML, в который перемещается точка вставки.

Пример

В следующем примере проверяется добавленный XML-элемент при вставке нового элемента в документ.

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

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.