Outlook VBA教程:Reminder对象

   
Reminders
Reminder
NameSpace

代表 Microsoft Outlook 提醒。提醒通过在指定时间弹出对话框,使用户清楚将要到来的约会。除了约会,提醒还可以提醒任务、联系人和电子邮件。

使用 Reminder对象

使用Reminders(index) 返回单个 Reminder对象,其中 index 为提醒的名称或索引号。以下示例显示集合中第一个提醒的标题。


Sub ViewReminderInfo()
'Displays information about first reminder in collection
    Dim olApp As Outlook.Application
    Dim objRem As Reminder
    Set olApp = Outlook.Application
    'If there are reminders, display message
    If olApp.Reminders.Count <> 0 Then
        Set objRem = olApp.Reminders.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

当创建了新的 Microsoft Outlook 项目(如AppointmentItem对象)并且ReminderSet属性设置为 True 时,提醒就会由程序创建。使用项目的ReminderTime属性设置提醒出现的时间(以分钟计)。以下示例创建新的会议并将 ReminderSet属性设置为 True,同时将新的 Reminder对象添加到 Reminders集合。


Sub AddMeeting()
'Adds a new meeting and reminder to the reminders collection
    Dim olApp As Outlook.Application
    Dim objMeet As AppointmentItem
    Set olApp = Outlook.Application
    Set objMeet = olApp.CreateItem(olAppointmentItem)
    objMeet.ReminderSet = True
    objMeet.Subject = "Tuesday's meeting"
End Sub

使用 Reminders集合的Remove方法从集合中删除 Reminder对象。一旦提醒从其关联的项目中删除,AppointmentItem对象的 ReminderSet属性就设置为 False。

上页:Outlook VBA教程:RecurrencePattern对象 下页:Outlook VBA教程:Reminders集合

Outlook VBA教程:Reminder对象:相关链接

Outlook VBA教程:Reminders集合 Outlook VBA教程:RemoteItem对象
Outlook VBA教程:ReportItem对象 Outlook VBA教程:Results集合
Outlook VBA教程:Search对象 Outlook VBA教程:Selection对象
Outlook VBA教程:SyncObject对象 Outlook VBA教程:SyncObjects对象
Outlook VBA教程:TaskItem对象 Outlook VBA教程:TaskRequestAcceptItem对象
Outlook VBA教程:TaskRequestDeclineItem对象 Outlook VBA教程:TaskRequestItem对象
Outlook VBA教程:TaskRequestUpdateItem对象 Outlook VBA教程:UserProperties对象
Outlook VBA教程:UserProperty对象 Outlook VBA教程:View对象
Outlook VBA教程:Views集合 Outlook VBA教程:Outlook COM 加载项模板
Outlook VBA教程:对 COM 加载项的支持 Outlook VBA教程:对联系人链接的支持
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号