Как да сортирате по макрос
Искате ли да сортирате данни от програма VBA? Когато използвате Excel интерактивно, извиквате командата "Данни - Сортиране", но как да направите това с макрос? Следващата фигура показва несортиран списък:
За да сортирате такъв списък по колона В, например, използвайте следния макрос:
Sub SortColumnIncreasing ()
Затъмнете колоната за сортиране като низ
Затъмнена област като низа
Диапазон = "A1: D28"
Сортиране на колона = "B"
ActiveSheet.Range .Sort _
Ключ1: = Обхват (колона за сортиране & "1"), Поръчка1: = xlАсцендиращо, _
Заглавка: = xlGuess, MatchCase: = False, _
Ориентация: = xlTopToBottom
End Sub
Когато стартирате макроса, съответният диапазон от клетки се избира в таблицата. Като критерий Excel използва съдържанието от колона Б. Следната фигура показва резултата:
За да адаптирате макроса към вашите изисквания, дефинирайте съдържанието на променливите „Area“ и „Sort column“. В първата променлива определяте кой диапазон от клетки да бъде сортиран, като с втората променлива контролирате коя колона да се използва като критерий.
Съвет: Ако искате да знаете как да въвеждате и стартирате макроси в Excel, ще намерите кратко описание тук: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- в-excel-ein.html