Reminder オブジェクト (Outlook)

Outlook のアラームを表します。

注釈

アラームを使用すると、指定された時刻にポップアップ ダイアログ ボックスを表示して、今後の予定を忘れないようにすることができます。 予定に加えて、タスク、連絡先、電子メール メッセージに対してアラームが発生する可能性があります。

単一の Reminder オブジェクトを返すには、Reminders (index) を使用します。index はアラームの名前またはインデックス番号です。

アラームは、 AppointmentItem オブジェクトなどの新しいMicrosoft Outlookの項目が作成され、アイテムの ReminderSet プロパティが True に設定すると、プログラムで作成されます。

コレクションから Reminder オブジェクトを削除するには、Reminders コレクションの Remove メソッドを使用します。 関連付けられたアイテムからアラームが削除されると、AppointmentItem オブジェクトの ReminderSet プロパティが False に設定されます。

例

次の例は、コレクション内の最初のアラームのキャプションを表示します。

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

次の例では、新しい予定アイテムを作成し、 ReminderSet プロパティに true を指定 、新しい アラーム オブジェクトを 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

メソッド

プロパティ

関連項目

Reminder オブジェクト メンバーOutlook オブジェクト モデル リファレンス

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。