Método CustomXMLPart.AddNode (Office)
Adiciona um nó a uma árvore XML.
Sintaxe
expressão. AddNode (Pai, Nome, NamespaceURI, NextSibling, NodeType, NodeValue)
Expressão Uma expressão que retorna um objeto CustomXMLPart .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Responsável | Obrigatório | CustomXMLNode | Representa no nó ao qual esse nó será adicionado. Ao adicionar um atributo, o parâmetro denota o elemento ao qual o atributo deve ser adicionado. |
Name | Opcional | String | Representa o nome de base do nó a ser adicionado. |
NamespaceURI | Opcional | String | Representa o namespace do elemento a ser anexado. Esse parâmetro é necessário para acrescentar nós do tipo msoCustomXMLNodeElement ou msoCustomXMLNodeAttribute; caso contrário, ele é ignorado. |
NextSibling | Opcional | CustomXMLNode | Representa o nó ao qual deve se tornar o próximo nó irmão do novo nó. Se não especificado, o nó é adicionado ao final do filhos do nó pai. Esse parâmetro será ignorado para inclusões de tipo msoXMLNodeAttribute. Se o nó não é um filho do pai, um erro será exibido. |
NodeType | Opcional | MsoCustomXMLNodeType | Especifica o tipo de nó a ser anexado. Se o parâmetro não for especificado, presume-se para ser do tipo msoCustomXMLNodeElement. |
NodeValue | Opcional | String | Utilizado para definir o valor do nó anexado para os nós que permitem texto. Se o nó não permitir texto, o parâmetro será ignorado. |
Comentários
Se a operação AddNode resultar em uma estrutura inválida de árvore, a ação de anexar não será realizada e será exibida uma mensagem de erro.
Exemplo
O exemplo a seguir demonstra como adicionar um nó a um objeto CustomXMLPart.
Sub AddNodeCustomXmlParts()
Dim cxp1 As CustomXMLPart
Dim cxn As CustomXMLNode
With ActiveDocument
' Add and populate a custom xml part
Set cxp1 = .CustomXMLParts.Add("<invoice />")
' Set the parent node
Set cxn = cxp1.SelectSingleNode("/invoice")
' Add a node under the parent node
cxp1.AddNode cxn, "upccode", "urn:invoice:namespace"
End With
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.