Hi,
I’m writing an AppleScript to automate a text find/replace in Microsoft Word. I’d love for the operation to take place in all open documents at the same time.
The “find object” of the “text object” of a document has a boolean property called “all documents”. The “find object” is supposed to be the AppleScript version of the preferences that one is able to set using Word’s “Replace” dialog. I succeeded at setting “all documents” to true, however, when I attempted to run the operation using Word’s “execute find” command, it returned an error: “access not allowed”.
Am I missing something? Here’s the script I’m testing, this simply replaces all hyphens with non-breaking hyphens (I would love it if the script operated on ALL open documents). This assumes that there are multiple docs open, any feedback appreciated! Thanks ![]()
tell application "Microsoft Word"
set CurrentFindObject to find object of text object of active document
set all documents of CurrentFindObject to true
execute find CurrentFindObject find text "-" replace with "^~" replace replace all
end tell