Método CustomXMLPart.Load (Office)

Artigo
04/07/2023

Permite que o autor do modelo preencher um CustomXMLPart de um arquivo existente. Retorna True se a carga foi bem-sucedida.

Sintaxe

expressão. Carregar (FilePath)

Expressão Uma expressão que retorna um objeto CustomXMLPart .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
FilePath	Obrigatório	String	Aponta para o arquivo no computador do usuário ou em uma rede contendo o XML a ser carregado.

Valor de retorno

Booliano

Exemplo

O exemplo a seguir adiciona uma parte XML personalizada, preenche a parte XML personalizada de um arquivo e então manipula os nós da parte.

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

Confira também

Membros do objeto CustomXMLPart

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.

Compartilhar via