Как отсортировать листы в алфавитном или буквенно-цифровом порядке в Excel?
Сортировка листов в Excel по алфавиту или в буквенно-цифровом порядке заметно повышает организованность и эффективность вашей книги, особенно когда вы работаете с большим количеством листов. В этом руководстве представлены несколько методов достижения этой цели — с учётом разного уровня опыта пользователей в Excel.
Сортировка листов в алфавитном / буквенно-цифровом порядке с помощью кода VBA
Сортировка листов в алфавитном / буквенно-цифровом порядке с помощью Kutools для Excel
Сортировка листов в алфавитном / буквенно-цифровом порядке с помощью кода VBA
Центр поддержки Microsoft предлагает макрос для сортировки листов в алфавитном порядке. Выполните следующие шаги, чтобы применить его:
1.Удерживая нажатой клавишу «ALT» , нажмите «F11» — откроется окно «Microsoft Visual Basic for Applications» .
2. Выберите «Вставка» > «Модуль» и вставьте следующий макрос в окно «Модуль».
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
Упростите свою работу с функцией «Сортировать все листы» из Kutools для Excel! Независимо от количества листов, она легко приведёт их в порядок. Поддерживается несколько типов сортировки: алфавитная, точная, по цвету и в обратном порядке. Вы также можете свободно перемещать листы вверх и вниз, а при необходимости — мгновенно сбросить сортировку. Сделайте работу в Excel ещё эффективнее и удобнее!
1. Выберите «KUTOOLS PLUS» > «Лист» > «Сортировать все листы». См. снимок экрана:
2. В диалоговом окне «Сортировать все листы» на правой панели выберите нужный тип сортировки — например, «Алфавитная сортировка» или «Точная сортировка» — и нажмите кнопку «ОК».
После этого все листы будут отсортированы в соответствии с выбранным типом сортировки.
Kutools для Excel— раскройте весь потенциал Excel с помощью более чем 300 незаменимых инструментов, которые ускоряют и упрощают вашу работу, а также воспользуйтесь возможностями ИИ для более разумной обработки данных и повышения продуктивности.Получить сейчас
В этой статье описаны два способа сортировки листов в алфавитном или буквенно-цифровом порядке: с помощью кода VBA и надстройки Kutools для Excel. Выберите метод, который лучше всего подходит именно вам! Метод с использованием кода VBA идеален для тех, кто знаком со скриптами, и предлагает гибкое, полностью настраиваемое решение. А Kutools для Excel — это удобный инструмент «Сортировать все листы», который мгновенно и без программирования упорядочивает все листы в нужном порядке. Хотите освоить ещё больше полезных приёмов работы в Excel? На нашем сайте доступны тысячи обучающих материалов!
Связанная статья:
Сортировка вкладок листов по цвету
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек