返回 Boolean 类型值,确定提醒当前是否可见。所有活动的提醒都是可见的。如果值为 True,则提醒可见。只读。
expression.IsVisible
expression 必选。该表达式返回 Reminder 对象。
该属性的值在返回时由当前提醒的状态决定。
以下示例消除所有当前可见的提醒。例如,如果当前提醒是活动的,IsVisible 属性将返回 True。
Sub DismissReminders()
'Dismisses any active reminders
Dim olApp As Outlook.Application
Dim objRems As Reminders
Dim objRem As Reminder
Set olApp = Outlook.Application
Set objRems = olApp.Reminders
For Each objRem In objRems
If objRem.IsVisible = True Then
objRem.Dismiss
End If
Next objRem
End Sub