Прочитать на английском

Поделиться через


Объект XMLNodes (Word)

Коллекция объектов XMLNode , представляющая узлы в представлении дерева области задач Структура XML , которая указывает элементы, примененные пользователем к документу. Каждый узел в представлении дерева является экземпляром объекта XMLNode . Иерархия в представлении дерева указывает, содержит ли узел дочерние узлы. Y

Замечания

ou может возвращать коллекцию XMLNodes для выделенного фрагмента, диапазона или всего документа. Порядок, в котором объекты XMLNode отображаются в коллекции XMLNodes, совпадает с тем же порядком, в котором их начальные или конечные теги отображаются в указанном выделенном фрагменте, диапазоне или документе.

Используйте метод Item коллекции XMLNodes , чтобы вернуть отдельный объект XMLNode . Используйте метод Validate , чтобы убедиться, что XML-элемент действителен в соответствии с примененными схемами и что все необходимые дочерние элементы существуют и находятся в необходимом порядке. После запуска метода Validate используйте свойство ValidationStatus , чтобы проверить, является ли элемент допустимым, и свойство ValidationErrorText , чтобы отобразить пользователю сообщение о том, что пользователю необходимо исправить, чтобы xml-код в документе соответствовал правилам схемы XML.

В следующем примере проверяется каждый из XML-элементов в активном документе, и если элемент или атрибут признан недопустимым для схемы, пользователю возвращается сообщение с объяснением причин, почему элемент является недопустимым.

Dim objNode As XMLNode 
 
For Each objNode In ActiveDocument.XMLNodes 
 objNode.Validate 
 If objNode.ValidationStatus <> wdXMLValidationStatusOK Then 
 MsgBox objNode.ValidationErrorText(True) 
 End If 
Next

Используйте метод Add , чтобы добавить XML-элемент в выделенный фрагмент, диапазон или документ. В следующем примере элемент примера из схемы SimpleSample вставляется в активный документ в точке вставки или вокруг активного выделения.

Примечание

Так как XML учитывает регистр, xml-элемент, введенный в параметре Name метода Add , должен быть введен точно так, как он отображается в схеме, на который ссылается параметр пространства имен.

Dim objNode As XMLNode 
Dim intResponse As Integer 
 
Set objNode = Selection.XMLNodes.Add("example", "SimpleSample") 
 
objNode.Validate 
 
If objNode.ValidationStatus < 0 Then 
 intResponse = MsgBox("This element is invalid. " & _ 
 "Are you sure you want to add it?", vbYesNo) 
 If intResponse = vbNo Then objNode.Delete 
End If

См. также

Справочник по объектной модели Word

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

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