CustomerData.Item, méthode (PowerPoint)
Renvoie l’objet CustomXMLPart spécifié à partir de la collection CustomerData . En lecture seule.
Syntaxe
expression. Élément (Id)
Expression Expression qui renvoie un objet CustomerData .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Id | Requis | String | Identificateur de l’objet CustomXMLPart. |
Valeur renvoyée
CustomXMLPart
Remarques
Les objets CustomXMLPart de la collection CustomerData sont représentés par des GUID (identificateurs globaux uniques). Passez le GUID qui représente la partie XML personnalisée que vous voulez obtenir au paramètre Id de la méthode Item en tant que String. Vous pouvez obtenir l’ID d’un composant XML personnalisé particulier en obtenant la valeur de la propriété Id de l’objet CustomXMLPart .
Exemple
L’exemple suivant montre comment utiliser la méthode Item pour obtenir une partie XML personnalisée par sa chaîne d’identification.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.