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


Метод Range.InsertXML (Word)

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

Синтаксис

expression. InsertXML (XML, transform)

выражение: выражение, возвращающее объект Range.

Параметры

Имя Обязательный или необязательный Тип данных Описание
XML Обязательный String Указывает вставляемый XML-код. Это может быть любой допустимый пользовательский XML-код.
Transform Необязательный Variant Указывает xml-преобразование (XSLT), используемое для преобразования XML. Если этот параметр опущен, XML-код вставляется как пользовательский XML-код без применения преобразования.

Возвращаемое значение

Отсутствует

Пример

В следующем примере указанная XML-строка вставляется в документ в пятом абзаце. Это заменяет любой текст, содержащийся в пятом абзаце.

Dim strXML As String 
 
strXML = "<"xml version=""1.0""><abc:books xmlns:abc=""urn:books"" " & _ 
 "xmlns:xsi=""https://www.w3.org/2001/XMLSchema-instance"" " & _ 
 "xsi:schemaLocation=""urn:books books.xsd""><book>" & _ 
 "<author>Matt Hink</author><title>Migration Paths of the Red " & _ 
 "Breasted Robin</title><genre>non-fiction</genre>" & _ 
 "<price>29.95</price><pub_date>2006-05-01</pub_date>" & _ 
 "<abstract>You see them in the spring outside your windows. " & _ 
 "You hear their lovely songs wafting in the warm spring air. " & _ 
 "Now follow their path as they migrate to warmer climes in the fall, " & _ 
 "and then back to your back yard in the spring.</abstract></book></abc:books>" 
 
ActiveDocument.Paragraphs(5).Range.InsertXML strXML

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

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