Results 1 to 3 of 3
  1. #1
    Star Lounger
    Join Date
    Aug 2004
    Thanked 0 Times in 0 Posts

    Move message to folder with keystroke (Outlook 2003)

    I've never created a macro before, but I would like some help trying. I would like to be able to click a keystroke and have the current message I have highlighted in my Inbox, move to a specific folder (one that I've created). Can anyone help with this? I save important messages and it would be easier to move with one keystroke, rather than drag and drop or right-click and move. Thanks!

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Thanked 31 Times in 31 Posts

    Re: Move message to folder with keystroke (Outlook 2003)

    Try something like this:
    - Switch to the Visual Basic Editor (Alt+F11)
    - Select Insert | Module.
    - Copy the following macro into the module window and modify it as needed:
    Sub MoveToOtherFolder()
    Dim nsp As NameSpace
    Dim fldTarget As MAPIFolder
    Dim i As Integer
    Set nsp = GetNamespace("MAPI")
    Set fldTarget = nsp.GetDefaultFolder(olFolderInbox).Parent.Folders ("ImportantItems")
    For i = ActiveExplorer.Selection.Count To 1 Step -1
    ActiveExplorer.Selection.Item(i).Move fldTarget
    Next i
    Set fldTarget = Nothing
    Set nsp = Nothing
    End Sub
    - This macro will move the selected items to a folder named ImportantItems under Outlook Today. If it is somewhere else, you have to go up another level (.Parent) and specify the levels.
    - Switch back to Outlook.
    - Select Tools | Customize...
    - Activate the Commands tab.
    - Select the Macros category.
    - Drag the MoveToOtherFolder macro (or whatever name you gave it) to a convenient location on a toolbar.
    - Right-click the new button to edit its caption, icon etc.
    - Close the Customize dialog.

  3. #3
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Silicon Valley, USA
    Thanked 94 Times in 90 Posts

    Re: Move message to folder with keystroke (Outlook

    Outlook has never supported user-defined keyboard shortcuts. Why?!! I don't know, but there is one way to get them if you can make space for a toolbar button: you can create an accelerator key that works with Alt. To add the accelerator, drag the macro to a toolbar, right-click, and give it a name like &X-Reply. The X will appear underlined and can be activated with Alt+X. If you find that Alt does not behave as expected, it may be that the assigned letter already is in use by a top level menu or another button.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts