Объект XPath (Excel)
Представляет XPath, сопоставленный с объектом Range или ListColumn .
Используйте метод 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 и обратная связь.