Прочитать на английском

Поделиться через


Объект Напоминания (Outlook)

Содержит коллекцию всех объектов Reminder в приложении Microsoft Outlook, которые представляют напоминания для всех ожидающих элементов.

Замечания

Используйте свойство Reminders объекта Приложения, чтобы вернуть коллекцию Напоминания. Используйте напоминания (индекс), где index — это имя или порядковое значение напоминания, чтобы вернуть один объект Reminder .

Напоминания создаются программным способом при создании нового элемента Outlook с напоминанием. Например, напоминание создается при создании объекта AppointmentItem, а свойство ReminderSet объекта AppointmentItem имеет значение True.

Пример

В следующем примере отображаются субтитры каждого напоминания в списке.

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

В следующем примере создается новый элемент встречи и свойство ReminderSet имеет значение True, добавляя новый объект Reminder в коллекцию Reminders .

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

События

Методы

Свойства

См. также

Справочник по объектной модели Outlook

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.