如何變更 Outlook 中延遲寄件的預設時間?
在 Outlook 中撰寫與寄送郵件時,您可能會經常使用「延遲寄件」功能來精準掌控郵件實際寄出的時間。預設情況下,Outlook 會將「不早於」時間(如下方截圖所示)自動設為下午 5:00. 然而,此預設設定在實際應用中可能帶來困擾——除非每次使用該功能時手動調整時間,否則您的郵件可能會延遲至隔日下午 5:00 才寄出,這通常與您的工作節奏或溝通需求不符。
幸運的是,Outlook 提供了自動化或自訂預設延遲寄件時間的功能。調整後不僅更貼合您的偏好工作時段,還能有效管理收件人的期待。本教學將教您如何運用 VBA 程式碼,為所有延遲寄件自動套用自訂的預設時間,無需每次使用延遲功能時重複手動設定。

使用 VBA 程式碼變更 Outlook 中延遲寄件的預設時間
無法直接透過 Outlook 選項或設定變更其內建的預設延遲寄件時間。不過,您可運用 VBA 解決方案,在每次寄送郵件時自動套用您偏好的延遲寄件時間與條件。此彈性做法讓您精確掌控延遲功能的觸發時機與排程發送時間,有效簡化工作流程並確保一致性。
使用以下 VBA 程式碼:
- 延遲寄件時間:讓您指定郵件延遲發送的預定時間(例如上午 07:30),輕鬆掌握寄件節奏!
- 延遲寄件啟用時間:設定自該時間起寄出的郵件將自動延遲寄件(例如下午 5:30 之後)。
舉例來說,若您將延遲寄件時間設為上午 07:30,並啟用「下午 5:30 後自動套用此設定」的選項,則在上午 07:30 至下午 5:30 之間寄出的郵件會立即發送;反之,若在下午 5:30 之後至隔日上午 07:30 前寄信,Outlook 將自動保留該郵件,並於下一個工作日的上午 07:30 寄出。
此設定非常適合希望郵件寄件時間呈現於標準上班時段的使用者,無論實際撰寫時間為何,不僅有助於維持專業形象,也能盡可能避免在非工作時間打擾收件人。
使用此程式碼前,請考慮以下事項:
- 必須在排定的發送時間保持 Outlook 執行,才能順利完成寄件。預約發送的郵件將保留在寄件匣中,直到 Outlook 開啟並連上網路為止。
- 若您的系統或 Outlook 設定的時區與收件人所在地不同,請務必據此調整時間,以免造成混淆。
請依照下列步驟實作此解決方案:
1. 開啟 Outlook 桌面應用程式,同時按下 Alt+F11,即可啟動 Microsoft Visual Basic for Applications 編輯器。
2. 在 VBA 視窗中,展開 Project 1,然後按兩下 Microsoft Outlook Objects > ThisOutlookSession,即可開啟應用程式範圍事件處理的程式碼視窗。

VBA 程式碼:變更 Outlook 中延遲寄件的預設時間
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
'Updated by Extendoffice & EWP 20230602
Const xDelayTime As String = "07:30:00" 'The delay delivery time of emails
Const xCompareTime As String = "17:30:00" 'The time to enable the delay delivery option
Dim xMail As Outlook.MailItem
Dim xWeekday As Integer
Dim xNowTime As String
Dim xIsDelay As Boolean
Dim xRet1 As Integer
Dim xRet2 As Integer
On Error GoTo xError
If (Item.Class <> olMail) Then Exit Sub
Set xMail = Item
xWeekday = Weekday(Date, vbMonday)
xNowTime = Format(Now, "hh:nn:ss")
xIsDelay = False
xRet1 = StrComp(xNowTime, xDelayTime)
xRet2 = StrComp(xNowTime, xCompareTime)
If xRet1 = xRet2 Then
xIsDelay = True
End If
If (xRet1 = -1) And (xRet2 = -1) Then
xMail.DeferredDeliveryTime = Date & " " & xDelayTime
Else
If ((xWeekday = 5) And xIsDelay) Or (xWeekday = 6) Or (xWeekday = 7) Then
xMail.DeferredDeliveryTime = (Date + (5 - xWeekday + 3)) & " " & xDelayTime
ElseIf xIsDelay Then
xMail.DeferredDeliveryTime = (Date + 1) & " " & xDelayTime
End If
End If
Exit Sub
xError:
MsgBox "ItemSend: " & Err.Description, , "Kutools for Outlook"
End Sub 注意事項:
Const xDelayTime As String = "07:30:00"Const xCompareTime As String = "17:30:00"3. 輸入程式碼後,儲存變更並按下 Alt+Q 關閉 VBA 視窗。
啟用此 VBA 腳本後,在您指定的標準時段內(例如上午 07:30 至下午 5:30)寄出的郵件將立即發送。在此時段外寄出的郵件則會自動保留,並於下一個工作日上午 07:30 寄出,無需手動介入即可維持一致的寄件時程。
其他提示與疑難排解:
- 如果您遇到延遲發送停留在寄件匣中、未於排定時間寄出的問題,請確認 Outlook 在該時間是否正在執行且具備穩定的網路連線。寄件匣的郵件必須在 Outlook 開啟並連線時才能送出。
- 在更新或更換您的 Outlook 設定檔後,或當您換用新電腦時,必須重新套用此腳本,因為 VBA 專案設定不會自動轉移。
- 若要暫時停用此自動化功能,只需將 ThisOutlookSession 中的程式碼註解或刪除即可。
替代解決方案
若您偏好更快速、無需編寫程式碼的郵件排程方式,Kutools for Outlook 提供直覺易用的「計劃發送」功能,只需點擊幾下,即可輕鬆設定自動發送時間、延遲寄件,或排程重複郵件!立即了解更多:https://www.extendoffice.com/product/kutools-for-outlook/outlook-schedule-email.html

相關文章
變更 Outlook 中全天活動的預設提醒時間
一般而言,Outlook 2007/2010 中全天活動的預設提醒時間為 18 小時,而 Outlook 2013 則為 0.5 天。若此預設設定不符合您的工作節奏,別擔心!本文將教您如何輕鬆調整 Microsoft Outlook 中全天活動的預設提醒時間,讓行程安排更貼合您的需求。
變更 Outlook 中的預設後續追蹤時間
眾所周知,當您在 Outlook 中為郵件新增後續追蹤提醒時,預設的後續追蹤時間為下午 4:30(或其他時間,視您的工作時間而定)。然而,您或許希望將預設的後續追蹤時間調整為工作時間開始時段,例如上午 9:00,讓提醒更貼合您的日程安排!本文將說明如何輕鬆變更 Outlook 中的預設後續追蹤時間。
變更 Outlook 中的預設封存位置
Outlook 預設會為封存檔案指定儲存位置,但您也可以自訂該位置。本教學將詳細說明如何變更 Outlook 中的預設封存位置,立即掌握設定技巧!
變更 Outlook 中的預設附件儲存位置
您是否厭倦了每次啟動 Outlook 時都要重新尋找先前指定的附件儲存位置?本教學將教您如何設定預設附件儲存資料夾——設定完成後,即使重新啟動 Outlook,儲存附件時都會自動開啟您指定的資料夾,省時又省力!
將 Outlook 中全天活動的預設狀態改為「忙碌」
依預設,Outlook 會將一般活動的狀態設為「忙碌」,但全天活動則設為「有空」(如下方截圖所示)。每次建立全天活動時,您都需手動將「顯示為」狀態改為「忙碌」。本文提供兩種方法,協助您將全天活動的預設「顯示為」狀態變更為「忙碌」,省去重複操作的麻煩!
最佳 Office 生產力工具
體驗全新 Kutools for Outlook,內含 100+ 項超強功能!立即點擊下載!
🤖KUTOOLS AI:運用先進 AI 技術,輕鬆處理電子郵件——無論是回覆、摘要、優化、擴充、翻譯還是撰寫郵件,通通一鍵搞定!
📧 郵件自動化:自動答覆(支援 POP 與 IMAP)/預約寄送郵件/寄信時依規則自動抄送密送/自動轉發(高級規則)/自動加入問候語/自動將多收件人郵件拆分為個別訊息……
📨 郵件管理:撤回郵件/依主旨等條件封鎖詐騙郵件/刪除重複郵件/高級搜尋/整合文件夾……
📁 附件專業版:批次儲存/批次解除附加/批次壓縮/自動保存/自動拆離/自動壓縮……
🌟 介面魔法:😊更多精美酷炫表情符號/重要郵件來到時提醒您/最小化 Outlook 而非關閉……
👍 一鍵奇蹟:帶附件全部答復/防釣魚郵件/🕘顯示發送者當前時間時區……
👩🏼🤝👩🏻 聯絡人與行事曆:從選取的郵件中批次新增聯絡人/將聯繫人組拆分為個別群組/移除生日提醒……
用您的慣用語言暢享 Kutools — 完整支援英文、西班牙文、德文、法文、中文等 40 多種語言!
立即一鍵解鎖 Kutools for Outlook!別再等待,馬上下載,全面提升工作效率!


🚀 一鍵下載 — 立即取得所有 Office 增益集
強烈推薦:Kutools for Office(5 合 1)
一鍵下載五個安裝程式,一次完成 — Kutools for Excel、Outlook、Word、PowerPoint 與 Office Tab Pro!立即點擊下載!
- ✅ 一鍵便利:只需一次操作,即可下載全部五個安裝套件!
- 🚀 隨時應對任何 Office 任務:按需安裝所需增益集,立即提升工作效率!
- 🧰 包含:Kutools for Excel/Kutools for Outlook/Kutools for Word/Office Tab Pro/Kutools for PowerPoint