Compartilhar via


Evento Reminders.ReminderAdd (Outlook)

Ocorre após um lembrete ser adicionado.

Sintaxe

expression. ReminderAdd( _ReminderObject_ )

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
ReminderObject Obrigatório [_REMINDER] O objeto Reminder adicionado à coleção.

Comentários

Um lembrete não é criado realmente até que o item do Microsoft Outlook seja salvo. Portanto, esse evento não ocorrerá enquanto o objeto de item associado não tiver sido salvo.

Exemplo

O exemplo a seguir exibe a data do próximo lembrete quando um lembrete é adicionado à coleção.

Public WithEvents objReminders As Outlook.Reminders 
 
 
 
Sub Initialize_handler() 
 
 Set objReminders = Application.Reminders 
 
End Sub 
 
 
 
Private Sub objReminders_ReminderAdd(ByVal ReminderObject As Reminder) 
 
 'Occurs when a Reminder object is added to the collection using the user interface or object model 
 
 
 
 MsgBox "A new reminder is added that will fire at: " & _ 
 
 ReminderObject.NextReminderDate 
 
 
 
End Sub

Confira também

Objeto Reminders

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.