Created
December 9, 2013 08:44
-
-
Save papoms/7869222 to your computer and use it in GitHub Desktop.
Outlook mac 2011 - Move to folder Shortcut Action (Automator Workflow)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(* | |
Original code from http://forgetmenotes.blogspot.com/2011/01/mac-outlook-2011-keyboard-shortcut-to.html | |
Adapted 2013 by Paul Porzky http://porzky.com | |
*) | |
on run {} | |
tell application "Microsoft Outlook" | |
-- listSelectedItems : a list of all items selected in Entourage | |
set listMessages to current messages | |
-- Check to make sure items are selected, if not then quit | |
if ((count of listMessages) < 1) then return | |
-- Iterate through selected items | |
repeat with objInSelection in listMessages | |
set listFolders to mail folders | |
repeat with objFolder in listFolders | |
if (name of objFolder is "follow-up") then | |
set gtdFolder to objFolder | |
end if | |
end repeat | |
if (class of account of objInSelection is not imap account) then | |
-- IMAP currently not supported | |
move objInSelection to gtdFolder | |
end if | |
end repeat | |
end tell | |
end run |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
Also got errors on the script above.
Here's a script that worked for me: