Selection.XML (Word)

Devuelve una cadena que representa el texto XML en el objeto especificado.

XML (DataOnly)

DataOnly: Es true, se devuelve el texto del XML sin el formato XML de Word.

Dim strXML As String
strXML = Selection.XML