В этой статье вы узнаете, как сортировать данные с помощью кода VBA.

Сортировка данных — это повседневная деятельность, которую необходимо выполнять для облегчения понимания данных.

[.underline] # Давайте рассмотрим пример: # У нас есть отчет о продажах, и нам нужно отсортировать по номерам продаж

img1

Щелкните вкладку «Разработчик». В группе «Код» выберите Visual Basic

img2

Нажмите «Вставить», а затем «Модуль»

img3

Это создаст новый модуль.

Введите следующий код в модуль

Sub Sortdata_ascending ()

Sheets (1) .Range («a1: b» & Range («a1»). End (xlDown) .Row) .Sort _

key1: = Sheets (1) .Range («b: b»), order1: = xlAscending, Header: = xlYes

End Sub

img4

Нажмите сочетание клавиш ALT + F8, чтобы открыть окно макроса, а затем выберите макрос.

img5

Кроме того, вы можете нажать F5, чтобы запустить код на экране VBA.

Приведенный выше код будет отсортировать данные в порядке возрастания по значениям продаж.

img6

Чтобы отсортировать данные в порядке убывания по значению продаж (самые высокие продажи будут указаны вверху, а затем — вниз), мы будем использовать следующий код VBA:

Sub Sortdata_descending ()

Sheets (1) .Range («a1: b» & Range («a1»). End (xlDown) .Row) .Sort _

key1: = Sheets (1) .Range («b: b»), order1: = xlDescending, Header: = xlYes

End Sub

После выполнения макроса мы получим следующий результат (От наибольших к наименьшим продажам)

img7

Таким образом, вы можете легко сортировать данные с помощью кода VBA.