Note: The other languages of the website are Google-translated. Back to English
登入  \/ 
x
or
x
註冊  \/ 
x

or

在Outlook中閱讀後如何將電子郵件移動到指定的文件夾?

閱讀後將電子郵件移動到指定文件夾是在Outlook中保持收件箱文件夾整潔的最佳方法。 對於許多Outlook用戶,他們傾向於為這些已讀電子郵件的移動創建規則。 實際上,Outlook不支持此規則嚮導過程。 在本文中,我們將向您展示在Outlook中使用VBA代碼閱讀後如何將電子郵件移動到指定的文件夾。

在Outlook中閱讀後,將電子郵件移動到指定的文件夾

Office選項卡-在Office中啟用選項卡式編輯和瀏覽,並使工作更加容易...
Kutools for Outlook-為Microsoft Outlook帶來100種強大的高級功能
  • 自動CC / BCC 根據規則發送電子郵件; 自動前進 按規則發送多封電子郵件; 自動回复 沒有交換服務器,還有更多自動功能...
  • BCC警告 -如果您的郵件地址在密件抄送列表中,則當您嘗試全部答复時顯示消息; 缺少附件時提醒,還有更多提醒功能...
  • 回复(全部)帶有所有附件 在郵件對話中; 一次回复許多電子郵件; 自動添加問候語 回复時自動將日期和時間添加到主題中...
  • 附件工具:自動分離,全部壓縮,重命名,自動保存所有... 快速報告,計算所選郵件, 刪除重複的郵件和聯繫人...
  • 超過100種高級功能將 解決您的大部分問題 在Outlook 2010-2019和365中提供。全功能60天免費試用。

箭頭藍色右氣泡在Outlook中閱讀後,將電子郵件移動到指定的文件夾

在Outlook中運行VBA代碼閱讀後,可以將電子郵件移動到指定的文件夾。

1.首先,您需要創建一個新的文件夾名稱“評論”位於“收件箱”文件夾下。

2.打開收件箱文件夾,然後按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

3.然後雙擊以展開 Project1 > Microsoft Outlook對象 > 本次展望會議 打開 Vba工程.OTM 編輯器。

4.然後將下面的VBA代碼複製並粘貼到VbaProject.OTM編輯器,如上面的屏幕快照所示。

VBA代碼:閱讀後移動消息

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5。 然後點擊 慳了 按鈕以保存VBA代碼,然後關閉 Microsoft Visual Basic for Applications 窗口。

6.右鍵單擊 快速訪問工具欄,然後選擇 自定義快速訪問工具欄 從右鍵單擊菜單中。 看截圖:

7。 在裡面 Outlook選項 對話框,您需要:

1)。 選擇 從中選擇命令 下拉列表;

2)。 選擇 專案1。 ThisOutlookSession 在下面的框中 從中選擇命令 下拉列表;

3)。 點擊 加入 按鈕;

4)。 點擊 OK 按鈕。

8.然後您可以看到 按鈕顯示在 快速訪問工具欄。 確保您位於要移動所有已讀郵件的收件箱文件夾中,然後單擊 按鈕可在收件箱中運行VBA代碼。

筆記:

1.此VBA代碼可在Outlook 2007、2010和2013中應用; 但是,在Outlook 2007中,您可以直接單擊 按鈕運行代碼。

2.如果您的Outlook中存在多個電子郵件帳戶,則VBA代碼只能應用於將數據文件設置為默認帳戶的帳戶。 您可以通過單擊來檢查默認數據文件 文件 > 聯繫我們 > 帳戶設置 > 帳戶設置 打開 帳戶設置 對話框。 然後去 資料檔案 標籤,您將看到默認數據文件標記為 過。

3.如果要將默認數據文件更改為另一個電子郵件帳戶,請選擇並突出顯示要設置為默認帳戶的帳戶,然後單擊 設為默認帳戶設置 對話框。

4.首次運行VBA代碼時,如果發現一次並沒有全部清除已讀郵件,請繼續單擊“宏”按鈕,直到收件箱中的所有已讀郵件都已移出。


Kutools for Outlook-為Outlook帶來100個高級功能,並使工作更加輕鬆!

  • 自動CC / BCC 根據規則發送電子郵件; 自動前進 自定義多封電子郵件; 自動回复 沒有交換服務器,還有更多自動功能...
  • BCC警告 -當您嘗試全部答复時顯示消息 如果您的郵件地址在“密件抄送”列表中; 缺少附件時提醒,還有更多提醒功能...
  • 在郵件對話中回复(全部)帶有所有附件; 回复許多電子郵件 片刻之間; 自動添加問候語 回复時將日期添加到主題中...
  • 附件工具:管理所有郵件中的所有附件, 自動分離, 全部壓縮,重命名全部,保存全部...快速報告, 計算選定的郵件...
  • 強大的垃圾郵件 習俗 刪除重複的郵件和聯繫人... 使您能夠在Outlook中做得更聰明,更快和更好。
拍攝kutools前景kutools選項卡1180x121
拍攝kutools前景kutools加標籤1180x121
 

 

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Augusto · 1 years ago
    What if Only want to move read messages not from the main Inbox but from an Inbox sub-folder to the "Reviewed" folder?
  • To post as a guest, your comment is unpublished.
    Augusto · 1 years ago
    What if Only want to move read messages not from the main Inbox but from an Inbox sub-folder to the "Reviewed" folder?
  • To post as a guest, your comment is unpublished.
    EM · 1 years ago
    I used this VBA code, but now all of the emails moved to "Reviewed" are gone? Any ideas why?
  • To post as a guest, your comment is unpublished.
    Becky · 1 years ago
    has anyone had this not work the second time you tried to apply it?
  • To post as a guest, your comment is unpublished.
    fabio · 2 years ago
    Buongiorno


    Esiste la versione per Outlook 365 in italiano (non so se cambia qualcosa). Grazie
  • To post as a guest, your comment is unpublished.
    Jake · 3 years ago
    What line do I add when I only want this rule to apply to emails with a subject line including a word or text?
  • To post as a guest, your comment is unpublished.
    Keldon · 4 years ago
    Where's all the Dim's?????????????????????/ o.0
  • To post as a guest, your comment is unpublished.
    Karlton Hoskins · 4 years ago
    I tried the above method but nothing happens. I verified the folder name was accurate and in the right location. I also set my main account as default, where i will be moving read messages from. I click on the Macro button...nothing. Help. Did I miss something.
    • To post as a guest, your comment is unpublished.
      . · 3 years ago
      You have to activate the references in VBA
  • To post as a guest, your comment is unpublished.
    Liz · 4 years ago
    Can this VBA code be altered to move messages from an Inbox subfolder to a "Reviewed" folder in said subfolder?