Як сортувати аркуші в алфавітному / буквено-цифровому порядку в Excel?
Зазвичай ви можете сортувати або упорядковувати порядок вкладок аркушів у Excel, перетягуючи та опускаючи вкладки аркуша на панель вкладок аркуша. Але для того, щоб зробити це за допомогою декількох аркушів, ви можете розглянути такі хитрі способи швидкого сортування аркушів в алфавітному / буквено-цифровому порядку у великій книзі.
Сортуйте аркуші в алфавітному / буквено-цифровому порядку за кодом VBA
Сортуйте аркуші в алфавітному / буквено-цифровому порядку за допомогою Kutools для Excel
Сортуйте аркуші в алфавітному / буквено-цифровому порядку за кодом VBA
Існує макрос для сортування аркушів за альфа-версією, розміщений у Центрі підтримки Microsoft. Ми можемо застосувати його, виконавши такі дії:
1. Утримуйте клавішу ALT + F11 і відкриває Microsoft Visual Basic для додатків вікна.
2. Натисніть Insert > Модулі, а потім вставте наступний макрос у Вікно модуля.
VBA: Сортування аркушів в алфавітному / буквено-цифровому порядку
Sub SortWorkBook()
'Updateby20140624
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
Якщо ви не знайомі з макросами або віддаєте перевагу іншим способам, можете спробувати Kutools для Excel. Kutools для Excel's Сортувати аркуші інструмент може легко сортувати всі аркуші.
Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.
1. Клацання Kutools Plus > Робочий аркуш > Сортувати аркуші. Дивіться знімок екрана:
2, в Сортувати аркуші діалоговому вікні, виберіть потрібний тип сортування на правій панелі, наприклад Альфа-сорт, Буквено-цифрове сортування, а потім натисніть кнопку OK кнопку. Дивіться знімок екрана:
Потім усі аркуші сортуються на основі вказаного типу сортування. Дивіться знімок екрана:
Kutools для Excel's Сортувати аркуші інструмент може швидко переставити всі аркуші в активній книзі. Він підтримує кілька типів сортування, в тому числі Альфа-сорт, Буквено-цифрове сортування, Сортування кольорів та Зворотній. Крім того, ви також можете переміщати аркуші вгору / вниз і скидати сортування.
Якщо ви хочете отримати безкоштовну пробну версію (30 днів) цієї програми, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.
Демонстрація: сортуйте всі аркуші в алфавітному / буквено-цифровому порядку
Пов'язана стаття:
Сортувати вкладки робочого аркуша за кольором
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!