Propriété Reminder.NextReminderDate (Outlook)
Renvoie une valeur de type Date indiquant la prochaine heure à laquelle le rappel spécifié se produira. En lecture seule.
Syntaxe
expression. NextReminderDate
Expression Variable qui représente un objet Reminder .
Remarques
La valeur de la propriété NextReminderDate change chaque fois que la méthode Snooze de l’objet est exécutée ou lorsque l’utilisateur clique sur le bouton Répéter .
Exemple
L'exemple suivant indique comment créer un rapport présentant tous les rappels de la collection, ainsi que les dates auxquelles ils se produiront la prochaine fois. La sous-routine concatène les propriétés Caption et NextReminderDate dans une chaîne et affiche la chaîne dans une boîte de dialogue.
Sub DisplayNextDateReport()
'Displays the next time all reminders will be displayed.
Dim objRems As Outlook.Reminders
Dim objRem As Outlook.Reminder
Dim strTitle As String
Dim strReport As String
Set objRems = Application.Reminders
strTitle = "Current Reminder Schedule:"
strReport = ""
'Check if any reminders exist.
If objRems.Count = 0 Then
MsgBox "There are no current reminders."
Else
For Each objRem In objRems
'Add information to string.
strReport = strReport & objRem.Caption & vbTab & _
objRem.NextReminderDate & vbCr
Next objRem
'Display report in dialog box
MsgBox strTitle & vbCr & vbCr & strReport
End If
End Sub
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.