Skip to content

Instantly share code, notes, and snippets.

@swbuehler
Created February 23, 2013 23:06
Show Gist options
  • Save swbuehler/5021757 to your computer and use it in GitHub Desktop.
Save swbuehler/5021757 to your computer and use it in GitHub Desktop.
Get Evernote information into a Word Table (Example)
tell application "Evernote"
tell application "Microsoft Word"
set theDocument to active document
set theTable to make new table at theDocument with properties {number of rows:1, number of columns:2}
set content of text object of (get cell from table theTable row 1 column 1) to "Date"
set content of text object of (get cell from table theTable row 1 column 2) to "Job Description"
insert rows selection position below number of rows 1
set rowNumber to 2
end tell
set theNotes to every note in notebook "Job Search"
repeat with theNote in theNotes
set theDate to the creation date of theNote as text
set theTitle to the title of theNote
tell application "Microsoft Word"
set content of text object of (get cell from table theTable row rowNumber column 1) to theDate
set content of text object of (get cell from table theTable row rowNumber column 2) to theTitle
insert rows selection position below number of rows 1
set rowNumber to rowNumber + 1
end tell
end repeat
end tell
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment