Table.Sort, méthode (Outlook)
Trie les lignes de la table en fonction de la propriété spécifiée dans SortProperty et réinitialise la ligne actuelle à juste avant la première ligne de la table.
Syntaxe
expression. Sort (SortProperty, Décroissant)
Expression Variable qui représente un objet Table .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| SortProperty | Requis | String | Indique la propriété à utiliser pour trier les lignes de l'objet Table. |
| Descendant | Facultatif | Boolean | Trier ou non l'objet Table par ordre décroissant. |
Remarques
SortProperty peut être n’importe quelle propriété prédéfinie ou personnalisée explicite, à l’exception des propriétés binaires et à plusieurs valeurs. La propriété doit être référencée par son nom de chaîne explicite ; elle ne peut pas être référencée par un espace de noms. Pour plus d’informations sur la spécification des propriétés de tri, consultez Tri des éléments dans un dossier.
Le tri de la table équivaut à appeler une méthode MoveToStart . Le curseur est placé au début du tableau.
Si la méthode Table.Sort est appelée, puis Table.Restrict, les éléments filtrés dans le nouvel objet Table sont triés en fonction des mêmes paramètres SortProperty et SortOrder.
Table.Sort prend uniquement en charge le tri sur une seule colonne.
Exemple
L'exemple de code suivant montre comment trier les lignes dans un objet Table en fonction de la propriété ReceivedTime et imprimer la valeur de la propriété de sujet normalisé MAPI pour chaque ligne du tableau trié.
Sub SortTableByReceivedTime()
Dim oT As Outlook.Table
Dim oRow As Outlook.Row
Set oT = Session.GetDefaultFolder(olFolderInbox).GetTable
'Add normalized subject (subject without RE:, FW: and other prefixes)to the column set
oT.Columns.Add ("http://schemas.microsoft.com/mapi/proptag/0x0E1D001E")
'Sort by ReceivedTime in descending order
oT.Sort "[ReceivedTime]", True
Do Until oT.EndOfTable
Set oRow = oT.GetNextRow
'Print the normalized subject of each row
Debug.Print oRow("http://schemas.microsoft.com/mapi/proptag/0x0E1D001E")
Loop
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.