共用方式為

Reminder.NextReminderDate 屬性 (Outlook)

  • 發行項

會傳回 Date，指出指定提醒下次發生的時間。 唯讀。

語法

expression。 NextReminderDate

表達 代表 Reminder 物件的變數。

註解

NextReminderDate屬性值會在每次執行物件的Snooze方法或使用者按一下 [延遲] 按鈕時變更。

範例

下列範例會建立集合中所有提醒以及它們下次發生日期的報告。 副程式會將 Caption 和 NextReminderDate 屬性串連成字串，並在對話方塊中顯示字串。

Sub DisplayNextDateReport() 
 
 'Displays the next time all reminders will be displayed. 
 
 Dim objRems As Outlook.Reminders 
 
 Dim objRem As Outlook.Reminder 
 
 Dim strTitle As String 
 
 Dim strReport As String 
 
 
 
 Set objRems = Application.Reminders 
 
 strTitle = "Current Reminder Schedule:" 
 
 strReport = "" 
 
 'Check if any reminders exist. 
 
 If objRems.Count = 0 Then 
 
 MsgBox "There are no current reminders." 
 
 Else 
 
 For Each objRem In objRems 
 
 'Add information to string. 
 
 strReport = strReport & objRem.Caption & vbTab & _ 
 
 objRem.NextReminderDate & vbCr 
 
 Next objRem 
 
 'Display report in dialog box 
 
 MsgBox strTitle & vbCr & vbCr & strReport 
 
 End If 
 
End Sub

另請參閱

Reminder 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。