Метод Table.SortDescending (Word)
Сортирует строки таблицы в убывящем буквенно-цифровом порядке.
Синтаксис
выражение. SortDescending
выражение (обязательно). Переменная, представляющая объект Table.
Замечания
Первая строка таблицы считается записью заголовка и не включается в сортировку. Используйте метод Sort , чтобы включить запись заголовка в сортировку.
Этот метод предлагает упрощенную форму сортировки, предназначенную для источников данных слияния, содержащих столбцы данных. Для большинства задач сортировки используйте метод Sort .
Пример
В этом примере создается таблица 5x5 в новом документе, вставляется текст в каждую ячейку, а затем сортируется таблица по убыванию буквенно-цифрового порядка.
Set newDoc = Documents.Add
Set myTable = _
newDoc.Tables.Add(Range:=Selection.Range, NumRows:=5, _
NumColumns:=5)
For iRow = 1 To myTable.Rows.Count
For iCol = 1 To myTable.Columns.Count
Set MyRange = myTable.Rows(iRow).Cells(iCol).Range
MyRange.InsertAfter "Cell" & Str$(iRow) & "," & Str$(iCol)
Next iCol
Next iRow
MsgBox "Click OK to sort in descending order."
myTable.SortDescending
В этом примере выполняется сортировка таблицы, содержащей точку вставки в убывящем буквенно-цифровом порядке.
If Selection.Information(wdWithInTable) = True Then
Selection.Tables(1).SortDescending
Else
MsgBox "The insertion point is not in a table."
End If
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.