Метод Table.Sort (Outlook)
Сортирует строки таблицы по свойству, указанному в разделе SortProperty , и сбрасывает текущую строку непосредственно перед первой строкой в таблице.
Синтаксис
expression. Сортировка (SortProperty, убывание)
Выражение Переменная, представляющая объект Table .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| SortProperty | Обязательный | String | Указывает свойство, используемое для сортировки строк таблицы. |
| По убыванию | Необязательный | Логический | Следует ли отсортировать таблицу в порядке убывания. |
Замечания
SortProperty может быть любым явным встроенным или пользовательским свойством, за исключением двоичных и многозначных свойств. На свойство должно ссылаться явное строковое имя; На него нельзя ссылаться по пространству имен. Дополнительные сведения об указании свойств сортировки см. в разделе Сортировка элементов в папке.
Сортировка таблицы эквивалентна вызову метода MoveToStart . Курсор будет расположен в начале таблицы.
При вызове Table.Sort и Table.Restrict отфильтрованные элементы в новой таблице будут отсортированы по тем же sortProperty и SortOrder.
Table.Sort поддерживает сортировку только по одному столбцу.
Пример
В следующем примере кода показано, как сортировать строки в таблице на основе свойства ReceivedTime и выводится значение свойства нормализованного объекта MAPI для каждой строки в отсортированных таблицах.
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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.