CustomerData.Item 方法 (PowerPoint)
从 客户 集合中返回指定的 CustomXMLPart 对象。 此为只读属性。
语法
表达式。项 (ID)
表达 返回 CustomerData 对象的表达式。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Id | 必需 | String | CustomXMLPart 对象的 ID。 |
返回值
CustomXMLPart
备注
客户 集合中的单个 CustomXMLPart 对象表示通过 Guid (全局唯一标识符)。 通过 GUID,它表示要获取 Item 方法作为 字符串 的 Id 参数的自定义 XML 部件。 通过获取 CustomXMLPart 对象的 Id 属性的值,可以获取特定的自定义 XML 部件的 ID。
示例
以下示例演示如何使用 Item 方法按自定义 XML 部件的 ID 字符串获取自定义 XML 部件。
Public Sub Item_Example()
Dim pptSlide As Slide
Set pptSlide = ActivePresentation.Slides(1)
Dim pptShape As Shape
Set pptShape = pptSlide.Shapes(1)
' Get the CustomerData collection of the shape
Dim pptCustomerData As customerData
Set pptCustomerData = pptShape.customerData
' Add a new CustomXMLPart object to the
' CustomerData collection for this shape
Dim pptCustomXMLPart As CustomXMLPart
Set pptCustomXMLPart = pptCustomerData.Add
' Get the ID of the new part
Dim myString As String
myString = pptCustomXMLPart.Id
Debug.Print myString
' Get the new part from the collection by its Id
' and load XML into the part
pptCustomerData.Item(myString).LoadXML ("<text>This is XML data.</text>")
Debug.Print pptCustomXMLPart.xml
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。