vba - Outlook VBA：将重复模式中的每个约会日期与电子表格数据进行比较

Question

我想找到一种方法，使用循环将循环模式中的每个定期约会日期与电子表格中的数据进行比较，从而创建不规则的循环模式。这怎么可能实现？提前致谢。

Answer 1

正如 Eugene 提到的，您只能将日期传递给 Outlook 对象模型中的 GetOccurrence 方法，因此您有责任确定约会发生的日期 - 您需要以编程方式扩展重复模式并使用 RecurrencePattern .Exceptions 集合考虑修改的事件。

您当然可以遍历给定范围内的所有日期，并捕获由 GetOccurrence 引发的来自约会未发生的日期的异常。

如果使用Redemption是一个选项，它对RDORecurrencePattern .GetOccurrence 方法的实现允许传递整数索引（以及日期），这意味着您可以简单地循环遍历所有重复（只要它不是没有结束的重复）日期）。

Answer 2

AppointmentItem 类的GetRecurrencePattern方法返回一个RecurrencePattern对象，该对象表示约会的定期属性。它提供GetOccurrence方法，该方法在指定日期返回 AppointmentItem 对象的特定实例。因此，您可以使用电子表格中列出的数据并尝试在 Outlook 中找到相应的出现。请注意，如果在指定日期不存在该系列的约会，则GetOccurrence方法会生成错误。