Skip to main content

如何在 Outlook 中始終從特定帳戶發送新郵件?

Author: Siluvia Last Modified: 2025-05-13

假設您已在 Outlook 中建立了多個郵件帳戶,當您在 Outlook 中發送郵件時,「寄件人」欄位中顯示的郵件帳戶取決於您目前所使用的帳戶。無論您目前在哪個帳戶中,您希望始終從特定的郵件帳戶發送新郵件,以下教程可以幫助您,本教程中的方法能夠協助您實現這一需求。

使用 VBA 程式碼始終從特定帳戶發送新郵件


使用 VBA 程式碼始終從特定帳戶發送新郵件

此 VBA 程式碼可幫助您輕鬆地從指定的帳戶發送新郵件。請按照以下步驟操作:

1. 請按下 "Alt" + "F11" 鍵以打開「Microsoft Visual Basic for Applications」對話框。

2. 通過雙擊展開「Project1」>「Microsoft Outlook 物件」。然後雙擊「ThisOutlookSession」以打開「VbaProject.OTM」對話框。

steps of always sending a new email from specific account in outlook

3. 將以下 VBA 程式碼複製並貼上到對話框中。

VBA:始終從特定帳戶發送新郵件。

Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
    Set oMail = Application.CreateItem(olMailItem)
    oMail.SendUsingAccount = oAccount
    oMail.Display
End If
Next
End Sub

4. 現在,您需要將程式碼中的「Your account name」更改為您希望始終用來發送新郵件的郵件帳戶名稱。

steps of always sending a new email from specific account in outlook

5. 接著按下鍵盤上的「F5」鍵來執行該 VBA 程式碼。

6. 執行 VBA 程式碼後,會彈出一個新的「訊息」窗口,請撰寫您的郵件並點擊「發送」按鈕進行發送。

注意:此 VBA 程式碼已在 Outlook 2007、2010 和 2013 中成功測試,但無法在 Exchange 2007 和 2010 中執行。