Método Reminder.Dismiss (Outlook)

Descarta o lembrete atual.

Sintaxe

expression. Dismiss

Expressão Uma variável que representa um objeto Lembrete .

Comentários

O método Dismiss falhará se não houver lembrete visível.

Exemplo

O exemplo a seguir descarta todos os lembretes ativos. Um lembrete está ativo se a sua propriedade IsVisible é definida como True.

Sub DismissReminders() 
 
'Dismisses any active reminders. 
 
 
 
 Dim objRems As Outlook.Reminders 
 
 Dim objRem As Outlook.Reminder 
 
 Dim i As Integer 
 
 
 
 Set objRems = Application.Reminders 
 
 
 
 For i = objRems.Count To 1 Step -1 
 
 If objRems(i).IsVisible = True Then 
 
 objRems(i).Dismiss 
 
 End If 
 
 Next 
 
 Set olApp = Nothing 
 
 Set objRems = Nothing 
 
 Set objRem = Nothing 
 
End Sub

Confira também

Objeto Reminder

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.