如何通過Outlook中的其他帳戶自動轉發特定的傳入電子郵件

一些用戶在Outlook中配置了多個電子郵件帳戶，並將其中一個設置為默認帳戶。 但是，他們也希望Outlook通過另一個帳戶自動轉發特定的傳入電子郵件。 Outlook沒有此功能，因此只能通過本文共享的VBA代碼來實現。

例如，您已經在Outlook中設置了兩個POP3電子郵件帳戶，並將“帳戶1”設置為默認帳戶。 這樣，所有傳入的電子郵件將保存在帳戶1的Outlook文件中。您創建了一個Outlook規則，可以將特定的傳入電子郵件自動轉發給其他人。 現在，您希望所有的郵件轉發都通過另一個電子郵件帳戶（即帳戶2）執行。但是，Outlook規則不提供此類操作。 因此，您必須使用其他方法，例如以下方法。

通過其他帳戶自動轉發特定的傳入電子郵件

1. 首先，在Outlook中，通過“ Alt + F11”訪問VBA編輯器。
2. 然後，在VBA編輯器中，將以下VBA代碼放入空閒模塊中。

Sub AutoForwardMailsThroughAnotherAccount(objMail As Outlook.MailItem)
    Dim objForwardMail As Outlook.MailItem
    Dim objRecipient As Outlook.Recipient
    Dim objMailAccounts As Outlook.Accounts
    Dim objMailAccount As Outlook.Account
 
    Set objForwardMail = objMail.Forward
    'Change the recipients of forwarding email
    Set objRecipient = objForwardMail.Recipients.Add("shelly@datanumen.com")
    objRecipient.Type = olTo
    objForwardMail.Recipients.ResolveAll
 
    Set objMailAccounts = Outlook.Application.Session.Accounts
    For Each objMailAccount In objMailAccounts
        'Replace "John Smith" with the display name of your email account
        If objMailAccount.DisplayName = "John Smith" Then
           objForwardMail.SendUsingAccount = objMailAccount
           objForwardMail.Send
        End If
    Next
End Sub

3. 接下來，退出VBA編輯器。
4. 隨後，在“主頁”選項卡上單擊“規則”>“管理規則和警報”。
5. 然後，在新對話框中，單擊“新規則”。
6. 之後，將顯示另一個對話框，您需要在其中選擇“對收到的郵件應用規則”，然後單擊“下一步”。
7. 接下來，在新屏幕中，您需要設置規則條件，例如“主題中帶有特定詞”，然後單擊“下一步”。
8. 在隨後的屏幕中，您必須選擇“運行腳本”並選擇剛才添加的新宏。
9. 之後，您可以根據屏幕上的嚮導完成規則設置。
10. 從現在開始，每次當特定電子郵件進入特定郵箱時，Outlook都會通過另一個特定電子郵件帳戶自動轉發。

損壞後搶救Outlook數據

儘管Outlook提供了許多功能，但仍然無法避免錯誤和損壞。 如果Outlook突然崩潰，則很有可能Outlook數據文件已損壞。 當時，即使是內置 Outlook修復 工具Scanpst無法幫助您。 您別無選擇，只能藉助強大的外部工具，例如 DataNumen Outlook Repair.

作者簡介：

Shirley Zhang是的數據恢復專家 DataNumen，Inc.是數據恢復技術的全球領導者，包括 損壞的SQL 和Outlook修復軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM