Цей макрос 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. Потім поверніться до аркуша, коли ви введете нове число в стовпець Ціна або зміните будь-які існуючі ціни, стовпець Ціна буде автоматично відсортований за зростанням.

примітки: під час введення нового номера в стовпець Ціна потрібно ввести номер у першій порожній комірці під вихідними номерами Якщо між новим введеним номером та оригінальними номерами є порожні комірки, а також пусті клітинки між оригінальними номерами, цей стовпець не буде сортуватися автоматично.

Легко сортувати за частотою зустрічань в Excel

Kutools для Excel Розширене сортування утиліта підтримує швидке сортування даних за довжиною тексту, прізвищем, абсолютним значенням, частотою тощо. Повнофункціональна безкоштовна пробна версія 30 днів!