View Single Post
Here's an AppleScript I use to collect all the text from multiple simple objects. This is handy when I've built up a sitemap as a diagram, and want to paste just the text into a spreadsheet.

It assumes the objects are arranged layer-wise in the order you want them.

Code:
tell application id "OGfl"
	tell front window
		set theSelection to the selection
		set numItems to length of theSelection
		set theText to ""
		repeat with itemNo from 1 to numItems
			set theText to theText & (text of item (numItems - itemNo + 1) of theSelection) & return
		end repeat
	end tell
	display dialog "The text:" default answer (theText as text)
end tell