次の方法で共有


CustomerData.Item メソッド (PowerPoint)

CustomerData コレクションから指定された CustomXMLPart オブジェクトを返します。 読み取り専用です。

構文

Item (Id)

CustomerData オブジェクトを返す式。

パラメーター

名前 必須 / オプション データ型 説明
Id 必須 String CustomXMLPart オブジェクトの ID です。

戻り値

CustomXMLPart

注釈

CustomerData コレクション内の個々 の CustomXMLPart オブジェクトは、Guid (グローバル一意識別子) で表されます。 Id 文字列 として 項目 のメソッドのパラメーターを取得するカスタム XML 部分を表す GUID を渡します。 CustomXMLPart オブジェクトの Id プロパティの値を取得することによって、特定のカスタム XML 部分の ID を取得できます。

次の使用例は、Item メソッドを使用してカスタム XML 部分を ID 文字列に基づいて取得する方法を示します。

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

関連項目

CustomerData コレクション

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。