Événement Application.XMLSelectionChange (Word)

Se produit lorsque le nœud XML parent de la sélection actuelle est modifié.

Syntaxe

expression. XMLSelectionChange'(Sel**, OldXMLNode, NewXMLNode, Reason)

Expression Variable qui représente un objet « Application » qui a été déclaré dans un module de classe à l’aide du mot clé WithEvents . Pour plus d’informations sur l’utilisation d’événements avec l’objet Application , consultez Utilisation d’événements avec l’objet Application.

Parameters

Nom Requis/Facultatif Type de données Description
Sel Obligatoire Selection Texte sélectionné, y compris les éléments XML. Si aucun texte n'est sélectionné, le paramètre Sél ne renvoie rien ou il renvoie le premier caractère à droite du point d'insertion.
OldXMLNode Obligatoire XMLNode Nœud XML à partir duquel le point d'insertion est déplacé.
NewXMLNode Obligatoire XMLNode Nœud XML vers lequel le point d'insertion est déplacé.

Exemple

L'exemple suivant valide un élément XML récemment ajouté lorsqu'un nouvel élément est inséré dans le document.

Private Sub Wrd_XMLSelectionChange(ByVal Sel As Selection, _ 
 ByVal OldXMLNode As XMLNode, ByVal NewXMLNode As XMLNode, _ 
 Reason As Long) 
 
 Dim intResponse As Integer 
 
 If Reason = wdXMLSelectionChangeReasonInsert Then 
 If Not NewXMLNode Is Nothing Then 
 NewXMLNode.Validate 
 End If 
 End If 
 
End Sub

Voir aussi

Objet Application

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.