如何在Outlook中發送定期計劃電子郵件？

在Microsoft Outlook中，您可以輕鬆地將日程安排定期約會，會議或任務發送給其他人。 但是，如果您只想發送定期重複的電子郵件而沒有任何約會，會議或任務，該怎麼辦？ 不幸的是，Outlook沒有提供用於發送計劃重複電子郵件的功能，但是在我們的教程中，我們將向您展示如何在Outlook中發送計劃重複電子郵件。

使用VBA代碼在Outlook中發送定期計劃電子郵件

• 第 1 部分：創建新約會
• 第 2 部分：創建新類別
• 第 3 部分：設置重複
• 第 4 部分：使用 VBA 代碼發送計劃定期電子郵件

使用出色的工具在 Outlook 中輕鬆發送定期重複的電子郵件

使用VBA代碼在Outlook中發送定期計劃電子郵件

本教程分為四個部分，完成這些部分後，您將成功發送計劃重複執行的電子郵件。 請執行以下操作。

第 1 部分：創建新約會

1.請瀏覽至 日曆 點擊查看 日曆 在 導航窗格，然後通過單擊創建新約會 新任命 下 首頁 標籤。

3。 在裡面 联系我们 對話框下 联系我们 標籤。 你需要：

備註：“ 預約主題 將成為重複出現的電子郵件主題； 和 預約機構 收件人收到電子郵件後，它將成為重複出現的電子郵件正文。

第 2 部分：創建新類別

現在，您需要創建一個名為“發送計劃定期電子郵件“ 如下：

1。 在裡面 联系我们 對話框，請點擊 分類 > 所有類別 在 標籤 組下 联系我们 標籤。

2。 當。。。的時候 顏色分類 彈出對話框，請點擊 全新 按鈕。 在裡面 添加新類別 對話框中，輸入“發送計劃定期電子郵件“在 姓名 領域; 然後在 顏色 下拉列表。 然後點擊 OK.

3.然後，您將看到“發送計劃定期電子郵件”類別已列出，請選中該框，然後單擊 OK 按鈕。

第 3 部分：設置重複

現在，該設置約會的重複時間了。

1。 點擊 循環 在 選項 組下 联系我们 標籤。 看截圖：

2。 在裡面 預約定期 對話框中，配置您的 循環 模式。 如果您需要結束時間，請在下面進行配置 復發範圍。 然後點擊 OK.

3.返回到 联系我们 對話框，請點擊 保存並關閉 按鈕。 看截圖：

第 4 部分：使用 VBA 代碼發送計劃定期電子郵件

1.請按 其他 + F11 打開 Microsoft Visual Basic for Applications 對話。

2。 雙擊 Project1 > Microsoft Outlook對象 > 本次展望會議 在左窗格中。 看截圖：

3.將以下VBA代碼複製並粘貼到VBA編輯器中。 然後點擊 節省 按鈕。

VBA：發送計劃定期電子郵件

Private Sub Application_Reminder(ByVal Item As Object)
'Updated by Extendoffice 20200522
Dim xMailItem As MailItem
Dim xItemDoc As Word.Document
Dim xNewDoc As Word.Document
Dim xFldPath As String
On Error Resume Next
If Item.Class <> OlObjectClass.olAppointment Then Exit Sub
If Item.Categories <> "Send Schedule Recurring Email" Then Exit Sub
Set xMailItem = Outlook.Application.CreateItem(olMailItem)
Set xItemDoc = Item.GetInspector.WordEditor
xFldPath = CStr(Environ("USERPROFILE"))
xFldPath = xFldPath & "\MyReminder"
If Dir(xFldPath, vbDirectory) = "" Then
    MkDir xFldPath
End If
xFldPath = xFldPath & "\AppointmentBody.xml"
xItemDoc.SaveAs2 xFldPath, wdFormatXMLDocument ' wdFormatXML
Set xNewDoc = xMailItem.GetInspector.WordEditor
VBA.DoEvents
xNewDoc.Application.Selection.HomeKey
xNewDoc.Activate
xNewDoc.Application.Selection.InsertFile FileName:=xFldPath, Attachment:=False
With xMailItem
    .To = Item.Location
    .Recipients.ResolveAll
    .Subject = Item.Subject
    .Send
End With
Set xMailItem = Nothing
VBA.Kill xFldPath
End Sub

4。 點擊 工具 > 參考 打開 參考 -項目 對話。 在對話框中，檢查 Microsoft Word對像庫 選項，然後單擊 OK 按鈕。

5。 按 其他 + Q 按鍵同時關閉 Microsoft Visual Basic for Applications 窗口。

當 提醒 彈出後，電子郵件將自動發送給您在第一部分的“位置”字段中鍵入的收件人。 然後點擊 Dismiss 在 提醒 對話。 並且電子郵件將在此時間每天重複發送。 看截圖：

備註：VBA代碼已在Outlook 2010和更高版本中成功測試。

使用出色的工具在 Outlook 中輕鬆發送定期重複的電子郵件

對於很多Outlook用戶來說，上述方法過於繁瑣，無法正確處理。 這裡強烈推薦 安排自動發送 的特點 Kutools for Outlook. 使用此功能，您可以輕鬆創建多封重複電子郵件，並根據需要安排這些電子郵件每天、每週、每月或每年定期發送。 請按以下步驟完成。

造訪 下載 Kutools for Outlook 嘗試一下。

1。 點擊 庫工具 > 安排自動發送 > 創建自動發送計劃.

2.然後一個消息窗口正在打開，您需要：

3.現在 電子郵件重複 彈出對話框，需要指定 重複時間, 重複模式 和 復發範圍 對於電子郵件，然後單擊 OK 按鈕。

4. 現在它返回到消息窗口，單擊 保存並關閉 按鈕保存重複設置並關閉窗口。

提示： 您可以根據需要重複上述步驟 1 到 4 以創建多個定期電子郵件。

5. 現在通過單擊打開該功能 庫工具 > 安排自動發送 > 啟用。

6.在開幕 Kutools for Outlook 對話框，單擊 確定。

完成上述設置後，當到達指定的日期和時間時，將自動發送重複郵件。

注意： 您可以按如下方式輕鬆管理重複發送的電子郵件。

單擊以了解有關此功能的更多信息.