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.