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

Возникает при изменении родительского узла XML текущего выбора.

Синтаксис

выражение. 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 и обратная связь.