Наприклад, у вас є таблиця покупок, як показано на екрані зліва. Тепер ви хочете, щоб стовпець Ціна сортувався автоматично, коли ви вводите новий номер / ціну в цей стовпець, як ви могли це вирішити? Тут я представляю макрос VBA, який допоможе вам автоматично сортувати певний стовпець за значенням у Excel.
Автоматичне сортування стовпця за значенням за допомогою VBA
Цей макрос VBA автоматично сортує всі дані у певному стовпці, як тільки ви вводите нові дані або змінюєте значення в стовпці в Excel.
1. Клацніть правою кнопкою миші назву поточного аркуша в Листок вкладки, а потім натисніть кнопку Переглянути код з меню, що клацне правою кнопкою миші.
2. У діалоговому вікні Microsoft Visual Basic for Application відкрийте наведений нижче код макросу VBA у вікні відкриття.
VBA: Автоматичне сортування стовпця в Excel
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Range("B1").Sort Key1:=Range("B2"), _
Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End If
End Subпримітки: У наведеному вище коді vba B: B означає, що він автоматично сортуватиме стовпець B, B1 - це перша комірка у стовпці B, B2 - друга комірка у стовпці B, і ви можете змінити їх відповідно до своїх потреб.
3. Потім поверніться до аркуша, коли ви введете нове число в стовпець Ціна або зміните будь-які існуючі ціни, стовпець Ціна буде автоматично відсортований за зростанням.
примітки: під час введення нового номера в стовпець Ціна потрібно ввести номер у першій порожній комірці під вихідними номерами Якщо між новим введеним номером та оригінальними номерами є порожні комірки, а також пусті клітинки між оригінальними номерами, цей стовпець не буде сортуватися автоматично.
Kutools для Excel Розширене сортування утиліта підтримує швидке сортування даних за довжиною тексту, прізвищем, абсолютним значенням, частотою тощо. Повнофункціональна безкоштовна пробна версія 30 днів!
