Document.Scripts (Word)

Returns a Scripts collection that represents the collection of HTML scripts in the specified object.

Debug.Print ActiveDocument.Scripts(1).ScriptText