Метод Range.Sort (Excel)
Сортирует диапазон значений.
Синтаксис
expression. Сортировка (Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3)
выражение: переменная, представляющая объект Range.
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Key1 | Необязательный | Variant | Указывает первое поле сортировки в виде имени диапазона (String) или объекта Range ; определяет отсортированные значения. |
Order1 | Необязательный | XlSortOrder | Определяет порядок сортировки для значений, указанных в Key1. |
Key2 | Необязательный | Variant | Второе поле сортировки; не может использоваться при сортировке сводной таблицы. |
Type | Необязательный | Variant | Указывает, какой тип элементов следует отсортировать в сводной таблице. Укажите xLSortLabels для сортировки по меткам, предназначенным для диапазонаexperession в областях Метки строк или колумов в диапазоне сводной таблицы, или xLSortValues, если Key1 дополнительно ориентируется на ячейку в областях Значений или Под/итоговых значений с помощью нотации R1C1. |
Order2 | Необязательный | XlSortOrder | Определяет порядок сортировки для значений, указанных в Key2. |
Key3 | Необязательный | Variant | Третье поле сортировки; не может использоваться при сортировке сводной таблицы. |
Заказ3 | Необязательный | XlSortOrder | Определяет порядок сортировки для значений, указанных в Key3. |
Header | Необязательный | XlYesNoGuess | Указывает, содержит ли первая строка сведения о заголовке. xlNo — значение по умолчанию; укажите xlGuess, если вы хотите, чтобы Excel попытался определить заголовок. |
OrderCustom | Необязательный | Variant | Задает одночисленное смещение в списке настраиваемых заказов сортировки. |
MatchCase | Необязательный | Variant | Задайте значение True , чтобы выполнить сортировку с учетом регистра, значение False — для сортировки без учета регистра; не может использоваться со сводными таблицами. |
Orientation | Необязательный | XlSortOrientation | Указывает, должна ли сортировка выполняться по строке (по умолчанию) или столбцу. Задайте для xlSortColumns значение 1, чтобы сортировать по столбцам. Задайте значение xlSortRows равным 2, чтобы сортировать по строкам (это значение по умолчанию). |
SortMethod | Необязательный | XlSortMethod | Указывает метод сортировки. |
DataOption1 | Необязательный | XlSortDataOption | Указывает, как сортировать текст в диапазоне, указанном в Key1; не применяется к сортировке сводной таблицы. |
DataOption2 | Необязательный | XlSortDataOption | Указывает способ сортировки текста в диапазоне, указанном в Key2; не применяется к сортировке сводной таблицы. |
DataOption3 | Необязательный | XlSortDataOption | Указывает способ сортировки текста в диапазоне, указанном в Key3; не применяется к сортировке сводной таблицы. |
Возвращаемое значение
Variant
Пример
В этом примере возвращается значение цвета ячейки в столбце A с помощью свойства ColorIndex , а затем используется это значение для сортировки диапазона по цвету.
Sub ColorSort()
'Set up your variables and turn off screen updating.
Dim iCounter As Integer
Application.ScreenUpdating = False
'For each cell in column A, go through and place the color index value of the cell in column C.
For iCounter = 2 To 55
Cells(iCounter, 3) = _
Cells(iCounter, 1).Interior.ColorIndex
Next iCounter
'Sort the rows based on the data in column C
Range("C1") = "Index"
Columns("A:C").Sort key1:=Range("C2"), _
order1:=xlAscending, header:=xlYes
'Clear out the temporary sorting value in column C, and turn screen updating back on.
Columns(3).ClearContents
Application.ScreenUpdating = True
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.