如何在Outlook中发送计划定期电子邮件？
在Microsoft Outlook中，您可以轻松地向其他人发送日程安排重复约会，会议或任务。 但是，如果您只想发送定期重复的电子邮件而没有任何约会，会议或任务，该怎么办？ 不幸的是，Outlook没有提供发送定期重复电子邮件的功能，但是在我们的教程中，我们将向您展示如何在Outlook中发送定期重复电子邮件。
使用出色的工具在 Outlook 中轻松发送定期重复的电子邮件
使用VBA代码在Outlook中发送定期计划电子邮件
本教程分为四个部分，完成这些部分后，您将成功发送计划重复执行的电子邮件。 请执行以下操作。
1.请浏览至 日历 点击查看 日历 ，在 导航窗格，然后通过单击创建新约会 新任命 下 首页 标签。
3.在 任命 对话框下 任命 标签。 你需要：
| 答：输入 主题 | B：在“收件人”中输入收件人的电子邮件地址 地点 |
| C：配置 开始时间 和 结束时间 | D：在下方选择提醒 提醒 下拉列表。 如果您选择15分钟，则表示它将在发送电子邮件的15分钟前提醒您。 |
| E：撰写您的约会内容。 |
备注：本 预约主题 将成为重复出现的电子邮件主题； 和 预约机构 收件人收到电子邮件后，它将成为重复出现的电子邮件正文。
现在，您需要创建一个名为“发送计划定期电子邮件“ 如下：
1.在 任命 对话框，请点击 分类 > 所有分类 ，在 标签 组下 任命 标签。
2。 当。。。的时候 颜色分类 弹出对话框，请点击 全新 按钮。 在里面 添加新类别 对话框中，输入“发送计划定期电子邮件“ 在里面 姓名： 领域; 然后在 颜色 下拉列表。 然后点击 OK.
3.然后您将看到“发送计划定期电子邮件”类别已列出，请选中该框，然后单击 OK 按钮。
现在，该设置约会的重复时间了。
1。 点击 循环 ，在 附加选项 组下 任命 标签。 看截图：
2.在 预约定期 对话框中，配置您的 循环 模式。 如果您需要结束时间，请在下面进行配置 复发范围。 然后点击 OK.
3.返回到 任命 对话框，请点击 保存并关闭 按钮。 看截图：
1.请按 其他 + F11 打开 Microsoft Visual Basic应用程序 对话。
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 Sub4。 点击 鑫安工具 > 参考资料 打开 参考资料 -项目 对话。 在对话框中，检查 Microsoft Word对象库 选项，然后单击 OK 按钮。
5。 按 其他 + Q 按键同时关闭 Microsoft Visual Basic应用程序 窗口。
当。。。的时候 提醒 弹出后，电子邮件将自动发送给您在第一部分的“位置”字段中键入的收件人。 然后点击 解除此信息 ，在 提醒 对话。 并且电子邮件将在这段时间内每天重复发送。 看截图：
备注：VBA代码已在Outlook 2010和更高版本中成功测试。
使用出色的工具在 Outlook 中轻松发送定期重复的电子邮件
对于很多Outlook用户来说，上述方法过于繁琐，无法正确处理。 这里强烈推荐 安排自动发送 的特点 Kutools 展望. 使用此功能，您可以轻松创建多封重复电子邮件，并根据需要安排这些电子邮件每天、每周、每月或每年定期发送。 请按以下步骤完成。
在MyCAD中点击 软件更新 下载 Kutools for Outlook 尝试一下。
1。 点击 库工具 > 安排自动发送 > 创建自动发送计划.
2.然后一个消息窗口正在打开，您需要：
3.现在 电子邮件重复 弹出对话框，需要指定 重复时间, 重复模式 和 复发范围 对于电子邮件，然后单击 OK 按钮。
4. 现在它返回到消息窗口，单击 保存并关闭 按钮保存重复设置并关闭窗口。
提示： 您可以根据需要重复上述步骤 1 到 4 以创建多个定期电子邮件。
5. 现在通过单击打开该功能 库工具 > 安排自动发送 > 启用。
6.在开幕 Kutools 展望 对话框，单击 确定。
完成上述设置后，当到达指定的日期和时间时，将自动发送重复邮件。
请注意： 您可以按如下方式轻松管理重复发送的电子邮件。
Kutools 展望 包括适用于Microsoft Outlook的100多种强大功能。 60天免费试用，不受限制。 现在下载!
Kutools for Outlook-为Outlook带来100个高级功能，并使工作更加轻松！
- 自动CC / BCC 根据规则发送电子邮件； 自动转发 自定义多封电子邮件； 自动回复 没有交换服务器，还有更多自动功能...
- BCC警告 -当您尝试全部答复时显示消息 如果您的邮件地址在“密件抄送”列表中; 缺少附件时提醒，还有更多提醒功能...
- 在邮件对话中回复（全部）带有所有附件; 回复许多电子邮件 很快; 自动添加问候语 回复时将日期添加到主题中...
- 附件工具：管理所有邮件中的所有附件， 自动分离, 全部压缩，全部重命名，全部保存...快速报告， 计算选定的邮件...
- 强大的垃圾邮件 习俗 删除重复的邮件和联系人... 使您能够在Outlook中做得更聪明，更快和更好。
