Як сортувати аркуші в алфавітному / буквено-цифровому порядку в Excel?

Сортування робочих аркушів у Excel в алфавітному або буквено-цифровому порядку може значно покращити організацію та ефективність вашої робочої книги, особливо якщо ви маєте справу з великою кількістю аркушів. У цьому посібнику ви ознайомитеся з кількома методами досягнення цього, задовольняючи різні рівні комфорту користувача з Excel.

Сортуйте аркуші в алфавітному / буквено-цифровому порядку за кодом VBA

Сортуйте аркуші в алфавітному / буквено-цифровому порядку за допомогою Kutools для Excel

Сортуйте аркуші в алфавітному / буквено-цифровому порядку за кодом VBA

Існує макрос для сортування аркушів за альфа-версією, розміщений у Центрі підтримки Microsoft. Ми можемо застосувати його, виконавши такі дії:

1.  Утримуйте клавішу ALT + F11 і відкриває Microsoft Visual Basic для додатків вікна.

2.  Натисніть Insert > Модулі, а потім вставте наступний макрос у Вікно модуля.

VBA: Сортування аркушів в алфавітному / буквено-цифровому порядку

Sub SortWorkBook()
'Updateby Extendoffice
Dim xResult As VbMsgBoxResult
xTitleId = "KutoolsforExcel"
xResult = MsgBox("Sort Sheets in Ascending Order?" & Chr(10) & "Clicking No will sort in Descending Order", vbYesNoCancel + vbQuestion + vbDefaultButton1, xTitleId)
For i = 1 To Application.Sheets.Count
    For j = 1 To Application.Sheets.Count - 1
        If xResult = vbYes Then
            If UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then
                Sheets(j).Move after:=Sheets(j + 1)
            End If
            ElseIf xResult = vbNo Then
                If UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Then
                    Application.Sheets(j).Move after:=Application.Sheets(j + 1)
            End If
        End If
    Next
Next
End Sub

3. Натисніть кнопку F5 ключ для запуску цього макросу. У наступному вікні запиту натисніть Так, всі аркуші будуть відсортовані за зростанням в алфавітному порядку; і натисніть Немає, всі аркуші будуть відсортовані за спаданням за алфавітом.

Сортуйте аркуші в алфавітному / буквено-цифровому порядку за допомогою Kutools для Excel

Відкрийте для себе найкращого помічника в Excel – Kutools для Excel's Сортувати аркуші інструмент! Незалежно від того, скільки у вас робочих аркушів, це легко допоможе вам упорядкувати їх. Він підтримує різні типи сортування, включаючи алфавітне сортування, буквено-цифрове сортування, кольорове сортування та зворотне сортування. Крім того, ви можете переміщувати аркуші вгору та вниз, як забажаєте, і легко скинути сортування. Зробіть свою роботу в Excel ефективнішою та зручнішою!

1. Клацання Kutools Plus > Робочий аркуш > Сортувати аркуші. Дивіться знімок екрана:

2, в Сортувати аркуші діалоговому вікні, виберіть потрібний тип сортування на правій панелі, наприклад Альфа-сорт, Буквено-цифрове сортування, а потім натисніть кнопку OK кнопку. Дивіться знімок екрана:

Потім усі аркуші сортуються на основі вказаного типу сортування. Дивіться знімок екрана:

У цій статті наведено два методи сортування робочих аркушів в алфавітному або буквено-цифровому порядку: код VBA та Kutools для Excel. Виберіть метод, який найкраще відповідає вашим потребам. Метод коду VBA підходить для тих, хто знайомий зі сценаріями, і пропонує рішення, яке можна налаштовувати. Тим часом Kutools для Excel надає зручний інструмент сортування аркушів, який швидко та ефективно впорядковує всі робочі аркуші без необхідності кодування. Якщо вам цікаво ознайомитися з іншими порадами та підказками щодо Excel, наш веб-сайт пропонує тисячі посібників.

Пов'язана стаття:

Сортувати вкладки робочого аркуша за кольором