WorkbookBase.CustomXMLParts Propriété

Référence

Définition

Espace de noms:: Microsoft.Office.Tools.Excel

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

Important

Certaines informations portent sur la préversion du produit qui est susceptible d’être en grande partie modifiée avant sa publication. Microsoft exclut toute garantie, expresse ou implicite, concernant les informations fournies ici.

Obtient la collection des parties XML personnalisées dans le classeur.

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

Valeur de propriété

CustomXMLParts

Collection Microsoft.Office.Core.CustomXMLParts qui contient les composants XML personnalisés dans le classeur.

Exemples

L’exemple de code suivant ajoute des données d’employé au document en insérant un nouveau Microsoft.Office.Core.CustomXMLPart dans la Microsoft.Office.Core.CustomXMLParts collection. L’exemple récupère ensuite les données des employés à partir de la partie XML et affiche le nom de l’employé et la date d’embauche sur Sheet1.

Cet exemple concerne une personnalisation au niveau du document.

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

Remarques

Pour plus d'informations sur les parties XML personnalisées, consultez Vue d'ensemble des parties XML personnalisées.

S’applique à

Partager via