Document.Scripts (Word)

Retorna uma coleção de scripts que representa a coleção de scripts HTML no objeto especificado.

Debug.Print ActiveDocument.Scripts(1).ScriptText