使用英语阅读

通过


提醒对象 (Outlook)

代表 Outlook 提醒。

备注

用户可以通过提醒安排在指定时间弹出对话框,跟踪将要到来的约会。 除了约会,还可以对任务、联系人和电子邮件发出提醒。

使用 Reminders (索引) (其中 index 是提醒的名称或索引号)返回单个 Reminder 对象。

创建一个新的Microsoft Outlook项目,如一个 AppointmentItem 对象,和项的 ReminderSet 属性设置为 True 时,将以编程方式创建提醒。

使用 提醒 集合的 删除 方法可从集合中移除一个 提醒 。 一旦从与其关联的项中删除提醒, AppointmentItem 对象的 ReminderSet 属性设置为 False

示例

以下示例显示集合中第一个提醒的标题。

Sub ViewReminderInfo() 
 
 'Displays information about first reminder in collection 
 
 
 
 Dim colReminders As Outlook.Reminders 
 
 Dim objRem As Reminder 
 
 
 
 Set colReminders = Application.Reminders 
 
 'If there are reminders, display message 
 
 If colReminders.Count <> 0 Then 
 
 Set objRem = colReminders.Item(1) 
 
 MsgBox "The caption of the first reminder in the collection is: " & _ 
 
 objRem.Caption 
 
 Else 
 
 MsgBox "There are no reminders in the collection." 
 
 
 
 End If 
 
 
 
End Sub

下面的示例创建新的约会项目,将 ReminderSet 属性设置为 True ,则向 提醒 集合中添加一个新对象, 提醒

Sub AddAppt() 
 
 'Adds a new appointment and reminder to the reminders collection 
 
 Dim objApt As AppointmentItem 
 
 
 
 Set objApt = Application.CreateItem(olAppointmentItem) 
 
 objApt.ReminderSet = True 
 
 objApt.Subject = "Tuesday's meeting" 
 
 objApt.Save 
 
End Sub

方法

名称
Dismiss
暂停

属性

另请参阅

提醒对象成员Outlook 对象模型参考

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。