Objet UserDefinedProperties (Outlook)

Contient un ensemble d’objets UserDefinedProperty représentant les propriétés définies par l’utilisateur définies pour un objet Dossier .

Remarques

Les membres de la collection UserDefinedProperties correspondent aux champs qui figurent sous Champs définis par l'utilisateur dans le dossier dans la boîte de dialogue Afficher les champs.

Utilisez la propriété UserDefinedProperties pour récupérer l’objet UserDefinedProperties à partir d’un objet Dossier .

Utilisez la méthode Add pour définir et ajouter une propriété définie par l’utilisateur à la collection UserDefinedProperties et la méthode Remove pour supprimer une propriété définie par l’utilisateur existante de la collection UserDefinedProperties . Utilisez la méthode Item pour récupérer par nom ou index, ou la méthode Find pour localiser et récupérer par nom, un objet UserDefinedProperty de la collection UserDefinedProperties . Utilisez la méthode Actualiser pour recharger la collection UserDefinedProperties à partir du magasin.

La collection UserDefinedProperties ne contient que les définitions des propriétés définies par l'utilisateur, applicables à tous les éléments Outlook que compte le dossier. Pour récupérer ou modifier des valeurs de propriété définies par l’utilisateur pour un élément Outlook dans ce dossier, utilisez la propriété UserProperties de l’élément Outlook, tel qu’un objet MailItem , pour récupérer la collection UserProperties pour cet élément. Vous pouvez ensuite utiliser l’objet UserProperty de la propriété définie par l’utilisateur appropriée afin de récupérer ou de modifier la valeur de cette propriété définie par l’utilisateur pour l’élément Outlook.

Exemple

L'exemple Visual Basic pour Applications (VBA) suivant utilise la méthode Add pour créer et ajouter plusieurs objets UserDefinedProperty au dossier Boîte de réception par défaut.

Sub AddStatusProperties() 
 
 Dim objNamespace As NameSpace 
 
 Dim objFolder As Folder 
 
 Dim objProperty As UserDefinedProperty 
 
 
 
 ' Obtain a Folder object reference to the 
 
 ' Inbox default folder. 
 
 Set objNamespace = Application.GetNamespace("MAPI") 
 
 Set objFolder = objNamespace.GetDefaultFolder(olFolderInbox) 
 
 
 
 ' Add five user-defined properties, used to identify and 
 
 ' track customer issues. 
 
 With objFolder.UserDefinedProperties 
 
 Set objProperty = .Add("Issue?", olYesNo, olFormatYesNoIcon) 
 
 Set objProperty = .Add("Issue Research Time", olDuration) 
 
 Set objProperty = .Add("Issue Resolution Time", olDuration) 
 
 Set objProperty = .Add("Customer Follow-Up", olYesNo, olFormatYesNoYesNo) 
 
 Set objProperty = .Add("Issue Closed", olYesNo, olFormatYesNoYesNo) 
 
 End With 
 
End Sub 
 

Méthodes

Propriétés

Voir aussi

Référence du modèle objet Outlook

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.