XPath 对象 (Excel)
表示已映射到 Range 或 ListColumn 对象的 XPath。
使用 SetValue 方法可将 XPath 映射到区域或列表列。 SetValue 方法还用于更改现有 XPath 的属性。
使用 Clear 方法可删除已映射到区域或列表列的 XPath。
以下示例基于附加到工作簿的联系人架构映射创建 XML 列表,然后使用 SetValue 方法将每列绑定到 XPath。
Sub CreateXMLList()
Dim mapContact As XmlMap
Dim strXPath As String
Dim lstContacts As ListObject
Dim lcNewCol As ListColumn
' Specify the schema map to use.
Set mapContact = ActiveWorkbook.XmlMaps("Contacts")
' Create a new list.
Set lstContacts = ActiveSheet.ListObjects.Add
' Specify the first element to map.
strXPath = "/Root/Person/FirstName"
' Map the element.
lstContacts.ListColumns(1).XPath.SetValue mapContact, strXPath
' Specify the element to map.
strXPath = "/Root/Person/LastName"
' Add a column to the list.
Set lcNewCol = lstContacts.ListColumns.Add
' Map the element.
lcNewCol.XPath.SetValue mapContact, strXPath
strXPath = "/Root/Person/Address/Zip"
Set lcNewCol = lstContacts.ListColumns.Add
lcNewCol.XPath.SetValue mapContact, strXPath
End Sub
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。