Як сортувати вкладки робочого аркуша в алфавітному порядку в Excel

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

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

Для початку натисніть Alt + F11, щоб відкрити редактор Microsoft Visual Basic для додатків (VBA). Потім перейдіть до Вставити> Модуль.

Скопіюйте та вставте наступний макрос з Microsoft у вікно модуля, яке відображається.

Sub Sort_Active_Book () Dim i As Integer Дим j Як ціле Dim Розмістити як VbMsgBoxResult "Підкажіть користувачеві, в якому напрямку вони хочуть" сортувати робочі таблиці. "IAnswer = MsgBox (" Сортувати таблиці у порядку зростання? "& Chr (10) _ & "Натискання No буде сортуватись у порядку убування", _ vbYesNoCancel + vbQuestion + vbDefaultButton1, "Сортувати листи") Для i = 1 To Sheets.Count Для j = 1 To Sheets.Count - 1 "Якщо відповідь Так, то сортуйте у порядку зростання. 'Якщо iAnswer = vbYes Тоді Якщо UCase $ (Листи (j) .Name)> UCase $ (Листи (j + 1) .Name) Потім аркуші (j) .Move After: = Аркуші (j + 1) End Якщо "If" відповідь "Ні", потім відсортуйте у спадному порядку. 'ElseIf iAnswer = vbNo Then If UCase $ (Sheets (j) .Name) < UCase$(Sheets(j + 1).Name) Then                Sheets(j).Move After:=Sheets(j + 1)             End If          End If       Next j    Next i End Sub

Редактор VBA автоматично називає кожний модуль числом на кінці, наприклад, Module1, Module2 і т.д. Можна просто прийняти назву модуля за замовчуванням. Однак, якщо ви плануєте додати інші макроси до вашої робочої книги, це гарна ідея перейменувати кожен модуль, щоб ви знали, що вони є. Ми перейменуємо наш модуль, щоб показати вам, як це зробити.

Щоб перейменувати модуль, виберіть текст у полі Ім'я модуля в розділі Властивості на лівій панелі.

Введіть ім'я модуля в поле Ім'я та натисніть клавішу Enter. Зверніть увагу, що ім'я модуля не може містити пробіли.

Ім'я модуля змінюється у списку Модулі в розділі Проект у лівій області.

Закрийте редактор VBA, перейшовши в меню Файл> Закрити і повернутися до Microsoft Excel.

Тепер ми збираємося запустити макрос для сортування наших вкладок. Натисніть Alt + F8, щоб отримати доступ до списку макросів у діалоговому вікні Макрос. Виберіть макрос у списку (у нашому випадку це лише один макрос) і натисніть "Виконати".

Відобразиться наступне діалогове вікно, яке дозволяє вибрати, чи потрібно сортувати робочі листи у порядку зростання або спадання. Ми хочемо відсортувати їх у порядку зростання, тому натисніть "Так".

Вкладки робочого листа тепер розташовані в алфавітному порядку.

Доданий макрос є частиною вашої робочої книги зараз, але коли ви його збережете, ви, ймовірно, побачите наступне діалогове вікно. Це пояснюється тим, що ви зберегли книгу як файл .xlsx, який є звичайним форматом робочої книги Excel, який не містить макросів. Щоб включити макроси у свою книгу та запустити їх, потрібно зберегти книгу як робочу книгу з підтримкою макросів або файл .xlsm. Для цього натисніть кнопку "Ні" у цьому діалоговому вікні.

Відобразиться діалогове вікно Зберегти як. Перейдіть до місця, де потрібно зберегти робочу книгу з підтримкою макросів, якщо ви ще не в цій папці. Виберіть "Excel Macro-Enabled Workbook (* .xlsm)" зі спадного списку "Зберегти як тип".

Натисніть "Зберегти".

Якщо ви не збережете книгу як робочу книгу з підтримкою макросів (файл .xlsm), доданий макрос буде видалено. Можливо, ви захочете видалити .xlsx версію своєї робочої книги, щоб ви не забули використовувати версію .xlsm вашої книги, якщо ви хочете додати додаткові вкладки робочого аркуша та відсортувати їх знову за допомогою макросу. Ви завжди можете зберегти книгу як файл .xlsx, якщо ви більше не хочете використовувати макроси.