Classe XmlNamespace (Excel VBA)

Cet objet représente un espace de noms ajouté à un classeur.

Set

Pour utiliser une variable de classe XmlNamespace, elle doit d'abord être instanciée, par exemple

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

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe XmlNamespace : XmlMap.RootElementNamespace, XmlNamespaces.Item, XmlSchema.Namespace et Workbook.XmlNamespaces

For Each

Voici un exemple de traitement des éléments XmlNamespace dans une collection

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

Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Prefix

Cette propriété renvoie une chaîne (type de donnée String) qui représente le préfixe de l'espace de noms XML spécifié. En lecture seule.

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

Uri

Cette propriété renvoie une chaîne (type de données String) qui représente l’URI (Uniform Resource Identifier) de l’espace de noms XML spécifié. En lecture seule.

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

XmlNamespaces.Count

Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveWorkbook.XmlNamespaces.Count

XmlNamespaces.InstallManifest

Installe le kit d'extension XML spécifié sur l'ordinateur d'un utilisateur, en mettant la solution de document dynamique XML à la disposition d'au moins un utilisateur.

Pour des raisons de sécurité, vous ne pouvez pas installer un manifeste non signé. Pour plus d’informations sur les manifestes, voir le Kit de développement logiciel (SDK) Smart document.

Syntaxe : expression.InstallManifest (Path, InstallForAllUsers)

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

Arguments

Un argument nommé

Path (String) - Chemin d'accès et nom de fichier du kit d'extension XML.

Les arguments suivants sont facultatifs

InstallForAllUsers - La valeur True installe le kit d'extension XML et le met à la disposition de tous les utilisateurs sur un ordinateur. La valeur False rend le kit d'extension XML disponible pour l'utilisateur actuel uniquement. La valeur par défaut est False

XmlNamespaces.Item

Cette méthode renvoie un seul objet d'une collection.

Syntaxe : expression.Item (Index)

Index: Nom ou numéro d'index de l'objet.

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

XmlNamespaces.Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

XmlNamespaces.Value

Cette propriété renvoie une valeur de type String qui représente l'espace de noms XML ajouté au classeur.

Si le classeur contient plusieurs espaces de noms, les espaces de noms sont séparés par un espace vide dans la chaîne renvoyée par la propriété value .

Dim strValue As String
strValue = ActiveWorkbook.XmlNamespaces.Value