Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Trie la collection d'éléments en fonction de la propriété spécifiée. L'index de cette collection est ramené à 1 après exécution de cette méthode.
Syntaxe
expression. Trier (propriété, décroissant)
expression Variable qui représente un objet Items .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Propriété | Obligatoire | String | Nom de la propriété selon laquelle trier, qui peut être placé entre crochets, par exemple « [CompanyName ». Les propriétés définies par l’utilisateur qui contiennent des espaces doivent être placées entre crochets. Peut ne pas être une propriété définie par l’utilisateur des mots clés de type et peut ne pas être une propriété à valeurs multiples, telle qu’une catégorie. Pour les propriétés définies par l’utilisateur, la propriété doit exister dans la collection UserDefinedProperties pour Items.Parent, qui représente l’objet Dossier qui contient les éléments. |
| En ordre décroissant | Facultatif | Variant | Cet argument à la valeur True pour un tri par ordre décroissant. La valeur par défaut est False (croissant). |
Remarques
La méthode Sort affecte uniquement l'ordre des éléments d'une collection. Elle n'affecte pas l'ordre des éléments dans un affichage d'explorateur.
Trier ne peut pas être utilisé et provoque une erreur si le paramètre de propriété est l’une des propriétés suivantes :
Exemple
L’exemple suivant de Visual Basic pour Applications (VBA) utilise la méthode Trier pour trier la collection d’éléments du dossier Tâches par défaut en fonction de la propriété « DueDate » et affiche les dates d’échéance chacun à leur tour.
Sub SortByDueDate()
Dim myNameSpace As Outlook.NameSpace
Dim myFolder As Outlook.Folder
Dim myItem As Outlook.TaskItem
Dim myItems As Outlook.Items
Set myNameSpace = Application.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderTasks)
Set myItems = myFolder.Items
myItems.Sort "[DueDate]", False
For Each myItem In myItems
MsgBox myItem.Subject & "-- " & myItem.DueDate
Next myItem
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.