Selection.WordOpenXML (Word)

Devuelve una cadena que representa el XML incluido dentro de la selección en el formato XML abierto de Microsoft Word.

Esta propiedad devuelve sólo el XML en el documento que se necesita para representar la selección especificada.

Dim strWordOpenXML As String
strWordOpenXML = Selection.WordOpenXML