Compartir a través de


Método CustomXMLPart.Load (Office)

Permite al autor de la plantilla rellenar un CustomXMLPart desde un archivo existente. Devuelve True si la carga se realizó correctamente.

Sintaxis

expresión. Carga (FilePath)

Expresión Expresión que devuelve un objeto CustomXMLPart .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
FilePath Obligatorio String Apunta al archivo en el equipo del usuario o en una red que contiene el XML que se va a cargar.

Valor devuelto

Booleano

Ejemplo:

En el ejemplo siguiente se agrega un fragmento XML personalizado, se rellena el fragmento XML personalizado con XML de un archivo y, a continuación, se manipulan los nodos del fragmento.

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

Consulte también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.