Word) (Range.InsertXML 方法
會將指定的 XML 插入文件中的指定範圍,並取代任何包含在範圍中的任何文字。
語法
運算式。InsertXML (XML、 Transform)
expression 會傳回 Range 物件的運算式。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
XML | 必要 | String | 指定要插入的 XML。 可以是任何有效的自訂 XML。 |
Transform | 選用 | Variant | 指定用來轉換 XML 的 XML 轉換 (XSLT)。 如果省略這項設定,則將不會套用轉換,直接使用插入的 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 支援與意見反應。