Freigeben über

Application.Reminders property (Outlook)

  • Artikel

Gibt eine Reminders -Auflistung zurück, die alle aktuellen Erinnerungen darstellt. Schreibgeschützt.

Syntax

Ausdruck. Reminders

expression Eine Variable, die ein Application-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird die Reminders-Auflistung zurückgegeben und der Titel aller Erinnerungen in der Auflistung angezeigt. Wenn keine aktuellen Erinnerungen verfügbar sind, wird dem Benutzer eine Meldung angezeigt.

Sub ViewReminderInfo() 
 
 'Lists reminder caption information 
 
 Dim objRem As Outlook.Reminder 
 
 Dim objRems As Outlook.Reminders 
 
 Dim strTitle As String 
 
 Dim strReport As String 
 
 
 
 Set objRems = Application.Reminders 
 
 strTitle = "Current Reminders:" 
 
 strReport = "" 
 
 'If there are reminders, display message 
 
 If Application.Reminders.Count <> 0 Then 
 
 For Each objRem In objRems 
 
 'Add information to string 
 
 strReport = strReport & objRem.Caption & vbCr 
 
 Next objRem 
 
 'Display report in dialog 
 
 MsgBox strTitle & vbCr & vbCr & strReport 
 
 Else 
 
 MsgBox "There are no reminders in the collection." 
 
 End If 
 
End Sub

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.