Play That Back

SCRIPT {
    SendKeys "{Esc 5}"
    DdeExecute "WinWord", "System", "[ToolsMacro .Name=""CallToolsPlayThatBack"", .Run]"
}