XMLNode.ValidationStatus (Word)

Renvoie une constante WdXMLValidationStatus qui indique si un élément ou un attribut est valide par rapport au schéma attaché. Les valeurs de retour possibles sont wdXMLValidationStatusCustom, wdXMLValidationStatusOK.

Cette propriété peut renvoyer l’une des deux constantes WdXMLValidationStatus suivantes. | wdXMLValidationStatusCustom| Indique que la méthode SetValidationError a été utilisée pour définir la propriété ValidationErrorText à une chaîne de texte personnalisé. | | wdXMLValidationStatusOK| Indique qu’un élément XML ou un attribut est valide par rapport au schéma attaché. | Si ces constantes sont les deux seules constantes nommées que la propriété ValidationStatus accepte, il existe plusieurs autres valeurs non nommées issues du composant MSXML 5.0 inclus dans Microsoft Word.

Dim objNode As XMLNode 
Dim strValid As String 
 
For Each objNode In ActiveDocument.XMLNodes 
 objNode.Validate 
 If objNode.ValidationStatus <> wdXMLValidationStatusOK Then 
 strValid = strValid & objNode.BaseName & vbTab & _ 
 objNode.ValidationErrorText & vbCrLf 
 End If 
Next 
 
MsgBox "The following elements do not validate against " & _ 
 "the schema." & vbCrLf & vbCrLf & strValid & vbCrLf & _ 
 "You should fix these elements before continuing."