Klasse XMLSchemaReferences (Word VBA)
Eine Auflistung von XMLSchemaReference -Objekten, die die eindeutigen Namespaces darstellen, die an ein Dokument angefügt sind. Um eine XMLSchemaReferences -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim xmls as XMLSchemaReferences
Set xmls = ActiveDocument.XMLSchemaReferences
For Each
Hier ist ein Beispiel für die Verarbeitung der XMLSchemaReferences -Elemente in einer Sammlung
Dim xml As XMLSchemaReference
For Each xml In ActiveDocument.XMLSchemaReferences
Next xml
Add
Gibt ein XMLSchemaReference -Element zurück, das ein auf ein Dokument angewendetes Schema darstellt.
Add (NamespaceURI, Alias, FileName, InstallForAllUsers)
Sub AddSchema()
Dim objSchema As XMLSchemaReference
Set objSchema = ActiveDocument.XMLSchemaReferences _
.Add(, , "c:\schemas\simplesample.xsd", True)
End Sub
Arguments
Optional arguments
Die folgenden Argumente sind optional
NamespaceURI (String) - Der Name des Schemas, wie er im Schema definiert ist.
Alias (String) - Der Name des Schemas, der auf der Registerkarte Schemas im Dialogfeld Vorlagen und Add-Ins angezeigt wird.
FileName (String) - Der Pfad und der Dateiname des Schemas.
InstallForAllUsers (Boolean) - True, wenn alle Benutzer, die sich an einem Computer anmelden, auf das neue Schema zugreifen und es verwenden können.
Count
Gibt einen Wert vom Typ Long zurück, der die Anzahl der XML-Schemas in der Auflistung darstellt.
Dim lngCount As Long
lngCount = ActiveDocument.XMLSchemaReferences.Count
HideValidationErrors
Gibt einen Wert vom Typ Boolean zurück, der angibt, ob Word Schemavalidierungsfehler für das aktuelle XML-Dokument anzeigt.
Mit True werden Schemaüberprüfungsfehler für das aktuelle XML-Dokument von Word ausgeblendet.
ActiveDocument.XMLSchemaReferences _
.HideValidationErrors = True
IgnoreMixedContent
Gibt einen Wert vom Typ Boolean zurück, der angibt, ob Microsoft Word die Überprüfung von Textknoten mit gleichgeordneten Elementen vorformt, und gibt an, ob diese Textknoten in XML gespeichert werden, wenn die XMLSaveDataOnly -Eigenschaft auf truefestgelegt ist.
True bewirkt, dass Word Schema Verstöße ignoriert, die durch Textknoten verursacht wurden, die über Element-Geschwister verfügen; Außerdem wird verhindert, dass diese Textknoten in XML gespeichert werden, wenn die XMLSaveDataOnly -Eigenschaft auf truefestgelegt ist, wodurch verhindert wird, dass Text, der durch eine Extensible Stylesheet Language Transformation (XLST) eingefügt wurde, als Teil der Daten gespeichert wird.
ActiveDocument.XMLSchemaReferences _
.IgnoreMixedContent = True
Item
Gibt ein einzelnes XMLSchemaReference -Objekt in einer Auflistung zurück.
Item (Index)
Index: Das einzelne Objekt zurückgegeben werden soll.
Dim xml As XMLSchemaReference
Set xml = ActiveDocument.XMLSchemaReferences(Index:=1)
ShowPlaceholderText
Gibt zurück oder legt einen booleschen Wert , der angibt, ob automatischer Platzhaltertext für XML-Elemente in einem Dokument angezeigt wird.
Mit True wird der Platzhaltertext angezeigt.
ActiveDocument.XMLSchemaReferences.ShowPlaceholderText = _
Not ActiveDocument.XMLSchemaReferences.ShowPlaceholderText
Validate
Überprüft alle XML-Schemas, die einem Dokument angefügt sind.
Beim Ausführen der Validate-Methode füllt Microsoft Word die XMLSchemaViolations-Eigenschaft des Document-Objekts mit einer Auflistung der XML-Knoten auf, die Gültigkeitsfehler aufweisen.
ActiveDocument.XMLSchemaReferences.Validate