设置 Outlook 定期约会的默认结束日期的 2 种方法

在 Outlook 中，当您为约会启用“重复”时，默认情况下，约会将设置为没有结束日期。 如果您想更改它并为重复约会设置默认结束日期，您可以使用本文介绍的方法。

新建一个约会，点击“重复”按钮，在弹出的“约会重复”对话框中，可以看到默认选中“无结束日期”，如下图。 如果您不喜欢这个并且想要设置一个默认的结束日期，例如从第一次出现后的 90 天，您可以继续阅读。 在这里，我们将教您2种方法来实现它。

方法一：通过更改注册表设置

1. 首先，打开“开始菜单”，搜索“regedit”。
2. 然后，点击找到的“regedit”程序。
3. 接下来，将显示“用户帐户控制”对话框，您需要在其中单击“是”。
4. 进入“注册表编辑器”窗口后，导航到路径 - “HKEY_CURRENT_USER\Software\Microsoft\Office\ \Outlook\选项\日历”
5. 稍后，右键单击“日历”并选择“新建”>“DWORD（32 位）值”。
6. 随后，将此新值命名为“RecurrencesDefault”。
7. 接下来，双击该值。
8. 在弹出的“编辑 DWORD（32 位）值”对话框中，在“数值数据”字段中输入一个数字。 它指的是从今天开始的天数。 例如，如果它是“90”，Outlook 会将重复结束日期设置为从今天算起的 90 天。
9. 之后，单击“确定”并正常退出注册表编辑器。
10. 最后，重启 Outlook 并尝试创建重复约会。其结束日期将根据“RecurrencesDefault”值设置。

方法二：用Outlook VBA设置

1. 首先，按“Alt + F11”启动 Outlook VBA 编辑器。
2. 然后，将以下 VBA 代码放入“ThisOutlookSession”项目中。

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objAppointment As Outlook.AppointmentItem

Private Sub Application_Startup()
     Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is AppointmentItem Then
       Set objAppointment = Inspector.CurrentItem
    End If
End Sub

Private Sub objAppointment_PropertyChange(ByVal Name As String)
    Dim objRecurrencePattern As Outlook.RecurrencePattern
 
    'Change enable "Recurrence"
    If Name = "IsRecurring" Then
       If objAppointment.IsRecurring = True Then
          Set objRecurrencePattern = objAppointment.GetRecurrencePattern
          'Change the end date to 30 days from the start date
          'Alter "30" as per your needs
          objRecurrencePattern.PatternEndDate = objRecurrencePattern.PatternStartDate + 30
       End If
    End If
End Sub

3. 最后，点击进入“Application_Startup”宏，然后按“F5”。
4. 目前，您可以创建一个新约会。
5. 然后点击“Recurrence”按钮，修改周期设置，保持“No end date”不变，点击“OK”。
6. 之后可以重新点击“Recurrence”查看。 您将看到结束日期已根据您的 VBA 代码更改。

修复无法访问的 Outlook PST 文件

您是否曾在 Outlook 中收到任何涉及“无法访问 PST 文件”的错误消息？ 如果你有，你是如何处理它们的？ 也许您首先想到的是 Scanpst。 但是，当您尝试这样做时 修复Outlook，它也失败了。 在这种情况下，您最后的选择是经验丰富的数据恢复软件，例如 DataNumen Outlook Repair 或专门的恢复服务。

作者简介：

Shirley Zhang 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术领域的世界领先者，包括 修复 和 outlook 修复软件产品。 欲了解更多信息，请访问 datanumen.com