I'm trying to come up with an AppleScript that selects multiple adjacent words in a Microsoft PowerPoint slide.
I figured out how to select single words, and how to select the entire range of a text shape, but I cannot figure out how to select a custom range of multiple adjacent words.
Apple Script for selecting a single word:
tell application "Microsoft PowerPoint"
tell active presentation
tell slide 1
repeat with j from 1 to count of shapes
set aShape to shape j
if (name of aShape is "Title 1") then
select word 2 of text range of text frame of aShape
end if
end repeat
end tell
end tell
end tell
Apple Script for selecting the complete text shape:
tell application "Microsoft PowerPoint"
tell active presentation
tell slide 1
repeat with j from 1 to count of shapes
set aShape to shape j
if (name of aShape is "Title 1") then
set myTextFrame to text frame of aShape
set myRange to text range of myTextFrame
select text range of myTextFrame
end if
end repeat
end tell
end tell
end tell
Best Answer
You are very close. Let's say you want to select words 2 through 4 of your text frame of aShape:
Where you have this:
change it to this:
You could put in any number you want in there, not just 4, of course. If you might need to specify a different ending word every time you run the script you could extend this script by displaying a dialog box and asking for input.