Как отсортировать вкладки листов по цвету в Excel?
При работе с большими книгами Excel, содержащими несколько листов, назначение цветов вкладкам листов помогает визуально их категоризировать и организовывать. Однако Excel не предоставляет встроенной функции для автоматической сортировки вкладок листов по цвету. В этой статье мы рассмотрим два эффективных метода сортировки вкладок листов по цвету в Excel.
Сортировка вкладок листов по цвету с помощью кода VBA
Сортировка вкладок листов по цвету с помощью Kutools для Excel
Сортировка вкладок листов по цвету с помощью кода VBA
Используя следующий код VBA, вы можете отсортировать вкладки по цвету. Пожалуйста, выполните следующие действия:
1. Нажмите «Разработчик» > «Visual Basic», откроется новое окно «Microsoft Visual Basic для приложений», нажмите «Вставить» > «Модуль» и введите следующий код в Модуль:
VBA: Сортировка листов по цветам.
Sub SortWorkBookByColor()
'UpdatebyExtendoffice
Dim xArray1() As Long
Dim xArray2() As String
Dim n As Integer
Application.ScreenUpdating = False
If Val(Application.Version) >= 10 Then
For i = 1 To Application.ActiveWorkbook.Worksheets.Count
If Application.ActiveWorkbook.Worksheets(i).Visible = -1 Then
n = n + 1
ReDim Preserve xArray1(1 To n)
ReDim Preserve xArray2(1 To n)
xArray1(n) = Application.ActiveWorkbook.Worksheets(i).Tab.Color
xArray2(n) = Application.ActiveWorkbook.Worksheets(i).Name
End If
Next
For i = 1 To n
For j = i To n
If xArray1(j) < xArray1(i) Then
temp = xArray2(i)
xArray2(i) = xArray2(j)
xArray2(j) = temp
temp = xArray1(i)
xArray1(i) = xArray1(j)
xArray1(j) = temp
End If
Next
Next
For i = n To 1 Step -1
Application.ActiveWorkbook.Worksheets(CStr(xArray2(i))).Move after:=Application.ActiveWorkbook.Worksheets(Application.ActiveWorkbook.Worksheets.Count)
Next
End If
Application.ScreenUpdating = True
End Sub2. Затем нажмите «F5» или кнопку «Выполнить», чтобы выполнить код. Все вкладки листов будут отсортированы по цвету.
 |
 |
 |
Сортировка вкладок листов по цвету с помощью Kutools для Excel
С помощью Kutools вы можете быстро переупорядочить вкладки на основе их цветов, экономя время и исключая необходимость ручной сортировки или сортировки с помощью кода VBA. В этом разделе мы покажем вам, как использовать Kutools для Excel для сортировки вкладок листов по цвету без труда.
Если вы установили Kutools для Excel, вы можете отсортировать вкладки листов, выполнив следующие шаги:
1. Нажмите «Kutools Plus» > «Лист» > «Сортировать листы».
2. В диалоговом окне «Сортировать листы» нажмите кнопку «Сортировка по цвету», и вы увидите новый порядок вкладок в панели «Новый порядок вкладок листов».
3. Затем нажмите «ОК», чтобы отсортировать вкладки.
Эта функция может быстро переупорядочить все листы в активной книге. Она поддерживает несколько типов сортировки, включая «Алфавитная сортировка», «Точная сортировка», «Сортировка по цвету» и «Обратная сортировка». Кроме того, вы также можете перемещать листы вверх/вниз и сбрасывать сортировку.
Сортировка вкладок листов по цвету в Excel помогает улучшить организацию и облегчает навигацию по большим книгам. Хотя в Excel нет встроенной опции для этого, в данной статье описаны два полезных метода для вас. Выберите метод, который лучше всего соответствует вашим потребностям, и используйте функцию цвета вкладок Excel для оптимизации вашего рабочего процесса! Если вас интересуют дополнительные советы и хитрости 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-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек