Klasse XmlNamespaces (Excel VBA)

Die Klasse XmlNamespaces stellt die Auflistung der XmlNamespace -Objekte in einer Arbeitsmappe dar. Um eine XmlNamespaces -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim xns as XmlNamespaces
Set xns = ActiveWorkbook.XmlNamespaces

For Each

Hier ist ein Beispiel für die Verarbeitung der XmlNamespaces -Elemente in einer Sammlung

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

Count

Gibt einen Long-Wert zurück, der die Anzahl der Objekte in der Auflistung darstellt.

Dim lngCount As Long
lngCount = ActiveWorkbook.XmlNamespaces.Count

InstallManifest

Installiert das angegebene XML-Erweiterungspaket auf dem Computer des Benutzers und macht so eine XML-SmartDocument-Lösung für einen oder mehrere Benutzer verfügbar.

Aus Sicherheitsgründen können Sie kein unsigniertes Manifest installieren.

InstallManifest (Path, InstallForAllUsers)

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

Arguments

Ein benanntes Argument

Path (String) - Der Pfad und der Dateiname des XML-Erweiterungspakets.

Optional arguments

Das folgendes Argument ist optional

InstallForAllUsers - Beim Wert True wird das XML-Erweiterungspaket installiert und für alle Benutzer eines Computers verfügbar gemacht

Item

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Item (Index)

Index: Der Name oder die Indexnummer des Objekts.

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

Value

Gibt einen String-Wert zurück, der die XML-Namespaces darstellt, die der Arbeitsmappe hinzugefügt wurden.

Wenn die Arbeitsmappe mehr als einen Namespace enthält, werden die Namespaces durch ein Leerzeichen in der Zeichenfolge getrennt, die von der value -Eigenschaft zurückgegeben wird.

Dim strValue As String
strValue = ActiveWorkbook.XmlNamespaces.Value