如何从提醒中获得实际预约/会议时间?

时间:2012-08-13 11:40:55

标签: outlook-vba outlook-2010

ThisOutlookSession中,我添加了提醒代码:

Private Sub obj_ReminderFire(ByVal ReminderObject As Reminder)
  If (ReminderObject.Caption = "Daily Update") then 
    ' Do some thing. 
    ' Check if the reminder is for today only 
    If (ReminderObject.OriginalReminderDate = Now) Then
       'Do more things
    end if
  end if
end sub 

由于我的提醒在事件发生前15分钟设置为提醒,因此事件将在15分钟前触发。

如何从提醒中获得实际预约/会议时间?

2 个答案:

答案 0 :(得分:0)

如果您处理Reminder事件,则会获得事件所属的实际AppointmentItemMailItemContactItemTaskItem。< / p>

答案 1 :(得分:0)

读取Reminder.Item属性并将其适当地转换(例如,转移到AppointmentItem对象)。