Classe XmlNamespace (Excel VBA)

A classe XmlNamespace representa um namespace que foi adicionado a uma pasta de trabalho.

Set

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

Dim xmlnsp as XmlNamespace
Set xmlnsp = ActiveWorkbook.XmlNamespaces(Index:=1)

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo XmlNamespace: XmlMap.RootElementNamespace, XmlNamespaces.Item, XmlSchema.Namespace e Workbook.XmlNamespaces

For Each

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

Dim xmlnsp As XmlNamespace
For Each xmlnsp In ActiveWorkbook.XmlNamespaces
	
Next xmlnsp

Parent

Retorna o objeto pai do objeto especificado. Somente leitura.

Prefix

Retorna um valor String que representa o prefixo do namespace XML especificado. Somente leitura.

Dim strPrefix As String
strPrefix = ActiveWorkbook.XmlNamespaces(1).Prefix

Uri

Retorna um valor String que representa o URI Identificador de Recursos Uniforme do namespace XML especificado. Somente leitura.

Dim strUri As String
strUri = ActiveWorkbook.XmlNamespaces(1).Uri

XmlNamespaces.Count

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

Dim lngCount As Long
lngCount = ActiveWorkbook.XmlNamespaces.Count

XmlNamespaces.InstallManifest

Instala o pacote de expansão XML especificado no computador do usuário, disponibilizando a solução do documento inteligente XML a um ou mais usuários.

Por motivos de segurança, você não pode instalar um manifesto não assinado. Para obter mais informações sobre manifestos, consulte o Smart Document Software Development Kit (SDK).

Sintaxe : expression.InstallManifest (Path, InstallForAllUsers)

Application.XMLNamespaces.InstallManifest _ 
 "https://smartdocuments/simplesample/manifest.xml"

Arguments

O seguinte argumento é necessário

Path (String) - O caminho e o nome do pacote de expansão XML.

The following argument is optional

InstallForAllUsers - True instala o pacote de expansão para XML e o disponibiliza a todos os usuários em um computador. False torna o pacote de expansão XML disponível apenas para o usuário atual. O padrão é False

XmlNamespaces.Item

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

Sintaxe : expression.Item (Index)

Index: O nome ou número de índice do objeto.

Dim xmlnspItem As XmlNamespace
Set xmlnspItem = ActiveWorkbook.XmlNamespaces(Index:=1)

XmlNamespaces.Parent

Retorna o objeto pai do objeto especificado. Somente leitura.

XmlNamespaces.Value

Retorna um valor String que representa os espaços para nome XML adicionados à pasta de trabalho.

Se a pasta de trabalho contiver mais de um namespace, os namespaces serão separados por um espaço em branco na cadeia de caracteres retornada pela propriedade Value .

Dim strValue As String
strValue = ActiveWorkbook.XmlNamespaces.Value