WorkbookBase.CustomXMLParts Propriedade
Definição
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
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.