Classe XMLSchemaReference (Word VBA)

La classe XMLSchemaReference représente un schéma individuel attaché à un document. Pour utiliser une variable de classe XMLSchemaReference, elle doit d'abord être instanciée, par exemple

Dim xml as XMLSchemaReference
Set xml = ActiveDocument.XMLSchemaReferences(Index:=1)

For Each

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

Dim xml As XMLSchemaReference
For Each xml In ActiveDocument.XMLSchemaReferences
	
Next xml

Delete

Supprime la référence de schéma XML spécifiée.

ActiveDocument.XMLSchemaReferences(1).Delete

Location

Renvoie une chaîne qui représente l'emplacement physique d'un schéma XML.

Dim strLocation As String
strLocation = ActiveDocument.XMLSchemaReferences(1).Location

NamespaceURI

Renvoie une valeur de type String qui représente l’URI (Uniform Resource Identifier) de l’espace de noms de schéma pour l’objet spécifié.

Si vous créez des schémas XML à utiliser avec Microsoft Word, il est vivement recommandé de spécifier le paramètre targetNamespace dans le schéma.

If ActiveDocument.XMLSchemaReferences.Item(1) _ 
 .NamespaceURI <> "SimpleSample" Then 
 
 Application.XMLNamespaces.Item("SimpleSample") _ 
 .AttachToDocument (ActiveDocument) 
 
End If

Reload

Recharge les schémas XML référencés dans un document.

ActiveDocument.XMLSchemaReferences(1).Reload