Range.XML (Word)

Renvoie une valeur de type String qui représente le texte XML dans l’objet spécifié.

XML (DataOnly)

DataOnly: La valeur True renvoie le texte du XML sans le balisage XML de Word.

Dim strXML As String
strXML = ActiveDocument.Range.XML