CustomXMLPart.Load, méthode (Office)

Article
04/07/2023

Permet à l’auteur du modèle de remplir un CustomXMLPart à partir d’un fichier existant. Renvoie la valeur True si le chargement a abouti.

Syntaxe

expression. Load (FilePath)

Expression Expression qui renvoie un objet CustomXMLPart .

Parameters

Nom	Requis/Facultatif	Type de données	Description
FilePath	Requis	String	Pointe vers le fichier sur l’ordinateur de l’utilisateur ou sur un réseau contenant le code XML à charger.

Valeur renvoyée

Booléen

Exemple

L'exemple suivant montre comment ajouter une partie XML personnalisée, comment la remplir avec le contenu XML d'un fichier, et comment manipuler les nœuds de la partie.

Sub ShowCustomXmlParts() 
    On Error GoTo Err 
 
    Dim cxp1 As CustomXMLPart 
 
    With ActiveDocument 
        ' Example written for Word. 
 
        ' Add a custom XML part and then load the XML from a file. 
        Set cxp1 = .CustomXMLParts.Add 
        cxp1.Load "c:\invoice.xml" 
 
        Set cxn = cxp1.SelectSingleNode("//*[@quantity < 4]")  
        ' Insert a subtree before the single node selected previously. 
        cxn.InsertSubTreeBefore("<discounts><discount>0.10</discount></discounts>")   
               
        ' Delete custom XML part. 
        cxp1.Delete 
        cxn.Delete 
                 
    End With 
     
    Exit Sub 
                 
' Exception handling. Show the message and resume. 
Err: 
        MsgBox (Err.Description) 
        Resume Next 
End Sub

Voir aussi

Membres de l’objet CustomXMLPart

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.

Partager via