И сегодня многие пользователи продолжают пользоваться ранними версиями программы Excel. Эта статья актуальна как раз для них. В своем изначальном состоянии программа не знает, как можно было бы сортировать ячейки относительно их формата (т.е. сообразуясь с цветом заливки или цветом шрифта). Для многих пользователей Excel такое положение дел является совсем не комфортным, поскольку они используют в таблицах цветовое разделение информации.

Это действительно бывает удобно: можно одним цветом выделить, скажем, проданные товары, зеленым те, что должны поступить на склад, а красным – срочные или и вовсе просроченные заказы.

Итак, давайте попробуем сие досадное недоразумение исправить с помощью пользовательской функции. Называется эта функция ColorIndex. Она умеет выводить цифровой код заливки и цвета шрифта для каждой заданной ячейки. И по этому коду будет происходить сортировка.

Для того, чтобы эту функцию заставить работать, откройте редактор Visual Basic. Напомним, что найти его можно с помощью пути Сервис->Макрос-> редактор Visual Basic. Здесь вам нужно вставить новый модуль, он будет с пустым полем. Вставить пустой модуль можно через меню Вставка-> Модуль.

Следующим шагом вам нужно поместить в модуль текст функции, кстати, как видите, он предельно прост:

 

Public Function ColorIndex(Cell As Range)

ColorIndex = Cell.Interior.ColorIndex

End Function

 

Теперь редактор можно закрывать, сохранив, естественно, все изменения. Возвращаемся к нашим таблицам. Здесь нам нужно выделить пустую ячейку (совершенно любую), вызвать вновь введенную нами функцию (делается это через меню Вставки функции, категория «Определенные пользователем»). Вам потребуется указать аргумент, и в его качестве пойдет ячейка, форматирование которой вам потребно в числовом коде. То есть, вписывайте адрес нужной ячейки. На наш взгляд лучше всего использовать заливку – и нагляднее, и привычней.

Но есть у функции и два недостатка. Например, она не будет работать с цветом, который назначен ячейке при условном форматировании. А если вы изменили цвет ячеек, запустите пересчет листа, это делается нажатием клавиш Alt+Ctrl+F9.

Ну а что делать тем пользователям, которые сидят на программе, моложе 2003 года? А им ничего делать и не нужно, потому что с 2007 года функция сортировки по цвету форматирования ячеек была, наконец-то добавлена в обычные возможности Excel. Включайте автофильтр для таблицы и в списке отмечайте Фильтр по цвету. Вот и все.

?Читайте также: Лечим свой компьютер