WorkbookBase.CustomXMLParts Propriedade

Referência

Definição

Namespace:: Microsoft.Office.Tools.Excel

Assembly:: Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

Importante

Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.

Obtém a coleção de partes XML personalizadas na pasta de trabalho.

public:
 property Microsoft::Office::Core::CustomXMLParts ^ CustomXMLParts { Microsoft::Office::Core::CustomXMLParts ^ get(); };

public Microsoft.Office.Core.CustomXMLParts CustomXMLParts { get; }

member this.CustomXMLParts : Microsoft.Office.Core.CustomXMLParts

Public ReadOnly Property CustomXMLParts As CustomXMLParts

Valor da propriedade

CustomXMLParts

Uma coleção Microsoft.Office.Core.CustomXMLParts que contém as partes XML personalizadas na pasta de trabalho.

Exemplos

O exemplo de código a seguir adiciona dados de funcionários ao documento inserindo um novo Microsoft.Office.Core.CustomXMLPart na Microsoft.Office.Core.CustomXMLParts coleção. Em seguida, o exemplo recupera os dados dos funcionários da parte XML e exibe o nome do funcionário e a data de contratação em Sheet1.

Este exemplo destina-se a uma personalização no nível de documento.

private void AddCustomXMLPart()
{
    string xmlString =
        "<?xml version=\"1.0\" encoding=\"utf-8\" ?>"
        + "<employees>"
        + "<employee>"
        + "<name>Karina Leal</name>"
        + "<hireDate>1999-04-01</hireDate>"
        + "</employee>"
        + "</employees>";
    Office.CustomXMLPart employeeXMLPart =
        this.CustomXMLParts.Add(xmlString);

    Globals.Sheet1.Range["A1"].Value2 = employeeXMLPart.SelectSingleNode(
        "/employees[1]/employee[1]/name[1]").Text;
    Globals.Sheet1.Range["A2"].Value2 = employeeXMLPart.SelectSingleNode(
                "/employees[1]/employee[1]/hireDate[1]").Text;
}

Private Sub AddCustomXMLPart()
    Dim xmlString As String = _
        "<?xml version=""1.0"" encoding=""utf-8"" ?>" _
        + "<employees>" _
        + "<employee>" _
        + "<name>Karina Leal</name>" _
        + "<hireDate>1999-04-01</hireDate>" _
        + "</employee>" _
        + "</employees>"
    Dim employeeXMLPart As Office.CustomXMLPart = _
        Me.CustomXMLParts.Add(xmlString)

    Globals.Sheet1.Range("A1").Value2 = employeeXMLPart.SelectSingleNode( _
        "/employees[1]/employee[1]/name[1]").Text
    Globals.Sheet1.Range("A2").Value2 = employeeXMLPart.SelectSingleNode( _
                "/employees[1]/employee[1]/hireDate[1]").Text
End Sub

Comentários

Para obter mais informações sobre partes XML personalizadas, consulte Visão geral de partes XML personalizadas.

Aplica-se a

Compartilhar via