Сортировка таблиц альфанумерически по имени
В следующем примере показано, как сортировать листы в альфа-книге на основе имени листа с помощью свойства Name объекта Worksheet.
Пример кода предоставил: Том Уртис, Atlas Programming Management
Об участнике
Том Уртис, MVP — основатель компании Atlas Programming Management, создающей полноценные бизнес-решения для Microsoft Office и Excel в Кремниевой долине. Том обладает больше чем 25 годами опыта управления бизнесом и разработки приложений для Microsoft Office, а также является соавтором книги "Holy Macro! It’s 2,500 Excel VBA Examples".
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Как отсортировать листы в Excel? Сортировка листов в Excel по возрастанию и убыванию
Есть категория пользователей Excel, которая работает с книгами, содержащими вместо 3-х стандартых листов, гораздо большее их количество. У кого-то в этих книгах сметы, номера которых являются именами листов, у кого-то акты выполненных работ подрядных организаций, у кого-то расход топлива автомобилей маршрутного такси, у кого-то сборки экономических расчетов, а у кого-то электрические характеристики технологического оборудования, записываемые ежедневно на отдельный лист (или вообще ежечасно). Хорошо, если листы такой книги заранее отсортированы хоть как-то, а если нет? Даже простой поиск нужного листа в книге становится далеко не веселым занятием. Так хочется выстроить листы по алфавиту, но в стандартных средствах Excel такая возможность отсутствует.
Представляю Вашему вниманию простую в использовании надстройку (макрос) для Excel, которая позволяет отсортировать листы рабочей книги Excel как по возрастанию, так и по убыванию. Если кто-то сталкивался с не вполне корректной сортировкой, когда сразу следом за Лист1 идет Лист11, а не Лист2, может не волноваться. В этой надстройке такая проблема решена, она одинаково качественно отсортирует листы, названия которых состоят из букв, из цифр и из сочетания букв, цифр, пробелов и символов. Причем проделает это даже со скрытыми листами. Надстройка правильно и быстро сортирует листы с именами, состоящими из одних только цифр, таких например, как 1, 2, 3, 4, 5, а также листы с именами вида 1-1-1, 1-1-2, 1-1-3.
Надстройка запускается кнопкой, выведенной в меню Excel, при нажатии которой пользователь видит диалоговое окно, с помощью которого может выбрать способ сортировки листов по возрастанию, либо по убыванию. Существует также сортировка листов по цвету ярлычков и по настраиваемым спискам .
Также можно посмотреть на эту надстройку в действии . Надстройка легко устанавливается, а для тех, кто пока еще не сталкивался с установкой надстроек в Excel, есть пошаговая инструкция. На мой взгляд это достойная альтернатива ручному перетаскиванию листов.