Compartir a través de


Método CustomXMLParts.Add (Office)

Permite agregar un nuevo objeto CustomXMLPart a un archivo.

Sintaxis

expresión. Add (XML, SchemaCollection)

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

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
XML Opcional String Contiene el XML para agregarlo al objeto CustomXMLPart recién creado.
SchemaCollection Opcional CustomXMLSchemaCollection Representa el conjunto de esquemas que se utilizan para validar esta secuencia.

Valor devuelto

CustomXMLPart

Ejemplo:

En el ejemplo siguiente se agrega un nuevo CustomXMLPart, se selecciona customXMLPart mediante criterios de búsqueda y, a continuación, se selecciona un único nodo de esa parte.

Sub ShowCustomXmlParts() 
    On Error GoTo Err 
 
    Dim cxp1 As CustomXMLPart 
 
    Dim cxn As CustomXMLNode 
    Dim cxns As CustomXMLNodes 
    Dim strXml As String 
    Dim strUri As String 
 
        ' Example written for Word. 
 
        ' Add a custom XML part. 
        ActiveDocument.CustomXMLParts.Add "<custXMLPart />" 
 
        ' Returns the first custom XML part with the given root namespace. 
        Set cxp1 = ActiveDocument.CustomXMLParts("urn:invoice:namespace")         
 
        ' Get a node using XPath.                              
        Set cxn = cxp1.SelectSingleNode("//*[@quantity < 4]")  
     
    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.