Classe XMLSchemaReferences (Word VBA)
Collection d’objets XmlSchemaReference qui représentent les espaces de noms uniques associés à un document. Pour utiliser une variable de classe XMLSchemaReferences, elle doit d'abord être instanciée, par exemple
Dim xmls as XMLSchemaReferences
Set xmls = ActiveDocument.XMLSchemaReferences
For Each
Voici un exemple de traitement des éléments XMLSchemaReferences dans une collection
Dim xml As XMLSchemaReference
For Each xml In ActiveDocument.XMLSchemaReferences
Next xml
Add
Renvoie un XmlSchemaReference qui représente un schéma appliqué à un document.
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
Les arguments suivants sont facultatifs
NamespaceURI (String) - Nom du schéma tel qu'il est défini dans le schéma.
Alias (String) - Nom du schéma tel qu'il figure dans l'onglet Schémas de la boîte de dialogue Modèles et compléments.
FileName (String) - Chemin et nom de fichier du schéma.
InstallForAllUsers (Boolean) - True : tous les utilisateurs qui ouvrent une session sur un ordinateur peuvent accéder et utiliser le nouveau schéma.
Count
Renvoie un type long qui représente le nombre de schémas XML dans la collection.
Dim lngCount As Long
lngCount = ActiveDocument.XMLSchemaReferences.Count
HideValidationErrors
Renvoie une valeur de type Boolean qui indique si Word affiche les erreurs de validation de schéma pour le document XML actif.
True indique que Word masquer les erreurs de validation de schéma pour le document XML actif.
ActiveDocument.XMLSchemaReferences _
.HideValidationErrors = True
IgnoreMixedContent
Renvoie une valeur de type Boolean qui indique si Microsoft Word préforme la validation sur les nœuds de texte qui ont des frères d'élément et spécifie si ces nœuds de texte sont enregistrés au format XML lorsque la propriété XMLSaveDataOnly est true.
True indique que Word ignore les violations de schéma causées par les nœuds de texte qui ont les frères de l'élément ; Elle empêche également ces nœuds de texte d'être enregistré au format XML lorsque la propriété XMLSaveDataOnly prend la valeur True, ce qui permet d'éviter que le texte qui a été inséré par un Extensible Stylesheet Language Transformation (XSLT) d'être enregistré dans le cadre des données.
ActiveDocument.XMLSchemaReferences _
.IgnoreMixedContent = True
Item
Renvoie un objet XmlSchemaReference appartenant à une collection.
Item (Index)
Index: Objet spécifique qui doit être renvoyé.
Dim xml As XMLSchemaReference
Set xml = ActiveDocument.XMLSchemaReferences(Index:=1)
ShowPlaceholderText
Cette propriété renvoie ou définit un type Boolean qui indique si le texte d'espace réservé automatique est affiché pour les éléments XML dans un document.
True : affiche le texte d'espace réservé.
ActiveDocument.XMLSchemaReferences.ShowPlaceholderText = _
Not ActiveDocument.XMLSchemaReferences.ShowPlaceholderText
Validate
Valide tous les schéma XML attachés à un document.
Lorsque vous exécutez la méthode Validate, Microsoft Word renseigne la propriété XMLSchemaViolations de l'objet Document avec une collection de nœuds XML qui ont des erreurs de validation.
ActiveDocument.XMLSchemaReferences.Validate