É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
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour