View Single Post
I have an 80 page document which was opened on another machine without the original font installed and consequently I have to change the font back throughout the document.

How do I do this?

Thinking about applescript... but my applescript skills aren't good enough.

I can't work out how to "select all" on the page and change the font. This is where I got to, but can't work out anything else.

tell application "OmniGraffle Professional 5"
set theDocument to front document
set canvasCount to count of canvases of theDocument

repeat with canvasNumber from 1 to canvasCount
set canvas of front window to canvas canvasNumber of theDocument
select all
set font to "bentonsansf"
end repeat
end tell

Thanks in advance!