Classe XmlMap (Excel VBA)

A classe XmlMap representa um mapa XML que foi adicionado a uma pasta de trabalho.

Os principais procedimentos da classe XmlMap são Delete e XmlMaps.Add

Set

Para usar uma variável de classe XmlMap, ela primeiro precisa ser instanciada por exemplo

Dim xmlmp as XmlMap
Set xmlmp = ActiveWorkbook.XmlMaps(Index:=1)

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo XmlMap: ListObject.XmlMap, XmlMaps.Item, XmlMaps.Add, XPath.Map e Workbook.XmlMaps

For Each

Aqui está um exemplo de processamento dos itens XmlMap em uma coleção.

Dim xmlmp As XmlMap
For Each xmlmp In ActiveWorkbook.XmlMaps
	
Next xmlmp

Temas

Alguns procedimentos nesta classe foram agrupados em temas e são descritos em páginas de tema separadas

Import/Export with its procedures AppendOnImport, Export, ExportXml, Import, ImportXml, IsExportable e ShowImportExportValidationErrors
Name with its procedures RootElementName e RootElementNamespace

Métodos

Estes são os principais métodos da classe XmlMap

Delete - Remove da pasta de trabalho o mapa XML especificado.

ActiveWorkbook.XmlMaps(1).Delete

XmlMaps.Add - Adiciona um mapa XML à pasta de trabalho especificada.

Dim strSchema As String: strSchema = 
Dim xmlmp As XmlMap
Set xmlmp = ActiveWorkbook.XmlMaps.Add(Schema:=strSchema)

Propriedades

AdjustColumnWidth True se as larguras de coluna forem ajustadas automaticamente para o melhor ajuste a cada vez que você atualizar o mapa XML especificado.

ActiveWorkbook.XmlMaps(1).AdjustColumnWidth = True

DataBinding Retorna um objeto XmlDataBinding que representa a associação associada ao mapa de esquema especificado. Somente leitura.

Dim xdbDataBinding As XmlDataBinding
Set xdbDataBinding = ActiveWorkbook.XmlMaps(1).DataBinding

Name Retorna ou define um valor String que representa o nome amigável usado para identificar de forma exclusiva um mapeamento na pasta de trabalho.

ActiveWorkbook.XmlMaps(1).Name =

Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim objParent As Object
Set objParent = ActiveWorkbook.XmlMaps(1).Parent

PreserveColumnFilter Retorna ou define se a filtragem é preservada quando o mapa XML especificado é atualizado. Boolean de leitura/gravação.

ActiveWorkbook.XmlMaps(1).PreserveColumnFilter = True

PreserveNumberFormatting True se a formatação de número em células mapeadas para o mapa de esquema XML especificado são preservadas quando o mapa de esquema é atualizado. O valor padrão é False. Boolean de leitura/gravação.

ActiveWorkbook.XmlMaps(1).PreserveNumberFormatting = True

SaveDataSourceDefinition True se a definição da fonte de dados do mapa de esquema XML especificado for salva com a pasta de trabalho. O valor padrão é True. Boolean de leitura/gravação.

ActiveWorkbook.XmlMaps(1).SaveDataSourceDefinition = True

Schemas Retorna uma coleção XmlSchemas que representa os esquemas que contém o objeto XmlMap especificado. Somente leitura.

Dim xssSchemas As XmlSchemas
Set xssSchemas = ActiveWorkbook.XmlMaps(1).Schemas

WorkbookConnection Retorna uma nova conexão para o objeto XmlMap especificado. Somente leitura.

Dim wbconWorkbookConnection As WorkbookConnection
Set wbconWorkbookConnection = ActiveWorkbook.XmlMaps(1).WorkbookConnection

XmlMaps.Count Retorna um valor Long que representa o número de objetos na coleção.

Dim lngCount As Long
lngCount = ActiveWorkbook.XmlMaps.Count

XmlMaps.Item Retorna um único objeto de uma coleção.

Dim xmlmpItem As XmlMap
Set xmlmpItem = ActiveWorkbook.XmlMaps(Index:=1)

XmlMaps.Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim objParent As Object
Set objParent = ActiveWorkbook.XmlMaps.Parent