微軟Outlook宏將傳入電子郵件從收件箱移動到特定文件夾

Question

我可以知道我應該在宏中插入什麼代碼，以便在我看到它進入我的文件夾後立即將文件從我的收件箱傳輸到另一個特定文件夾收件箱？我不希望自動將其轉發到另一個文件夾，我希望一旦按下特定的組合鍵就會發生這種情況。請幫助？我不熟練使用Visual Basic？

Answer 1

你不需要一個宏來做到這一點，它可以用規則來完成。

我假設展望2013年，但是這將主要適用於大多數版本：

1. 進入收件箱>規則>創建規則>高級選項
2. 選中「在哪裏我的名字是在框中「（或您選擇的任何其他選項）
3. 單擊下一步
4. 對號‘將它移動到指定文件夾’，然後點擊名稱的藍色鏈接‘指定的文件夾’，然後選擇文件夾
5. 點擊下一步
6. 選擇您想要的任何其他規則，然後單擊下一步
7. 驗證您的規則設置，然後單擊Finish

Answer 2

'http://msdn.microsoft.com/en-us/library/office/ff860683(v=office.15).aspx

Sub MoveMessageToTestFolder() 

' Works on one selected item 

    Dim myNameSpace As Outlook.Namespace 
    Dim myInbox As Outlook.Folder 
    Dim myDestFolder As Outlook.Folder 
    Dim myItem As Object 

    Set myNameSpace = Application.GetNamespace("MAPI") 
    Set myInbox = myNameSpace.GetDefaultFolder(olFolderInbox) 

    ' Add As many .Folders("SubfolderName") as needed 
    Set myDestFolder = myInbox.Folders("Test") 
    Set myItem = Application.ActiveExplorer.Selection.Item(1) 

    If TypeOf myItem Is mailitem Then 
     myItem.Move myDestFolder 
    End If 

    Set myNameSpace = Nothing 
    Set myInbox = Nothing 
    Set myDestFolder = Nothing 
    Set myItem = Nothing 

End Sub 

http://www.slipstick.com/developer/how-to-use-outlooks-vba-editor/

http://www.howto-outlook.com/howto/macrobutton.htm