Événement MailItem.Read (Outlook)

  • Article

Survient lorsque l'utilisateur ouvre une instance de l'objet parent en vue d'une modification.

Syntaxe

expression. Read

expression Variable qui représente un objet MailItem.

Remarques

L’événement Read diffère de l’événement Open dans la mesure où Read survient dès que l’utilisateur sélectionne l’élément dans un affichage gérant la modification du contenu des cellules ou que l’élément est en cours d’ouverture dans un objet Inspector.

Exemple

Cet exemple Visual Basic pour Applications (VBA) utilise l’événement Read pour incrémenter un compteur qui suit la fréquence de lecture d’un élément.

Public WithEvents myItem As Outlook.MailItem 
 
 
 
Sub Initialize_handler() 
 
 Set myItem = Application.ActiveExplorer.CurrentFolder.Items(1) 
 
 myItem.Display 
 
End Sub 
 
 
 
Sub myItem_Read() 
 
 Dim myProperty As Outlook.UserProperty 
 
 Set myProperty = myItem.UserProperties("ReadCount") 
 
 If (myProperty Is Nothing) Then 
 
 Set myProperty = myItem.UserProperties.Add("ReadCount", olNumber) 
 
 End If 
 
 myProperty.Value = myProperty.Value + 1 
 
 myItem.Save 
 
End Sub

Voir aussi

Objet MailItem

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.