↑↑↑

↓↓↓



Флаг России Флаг Англии
🏠 | 💻 PC | MS Office |

Цветной выпадающий список в Excel

VBA Changing Line Colors
Developers Mode Dropdown List with Different Colors
Sorting Numbers Blank Workspace
Эта инструкция условно делится на две части: в первой я рассказываю о создании выпадающего списка, но если Вы уже знакомы с этим можете сразу переходить ко второй, в которой разобрано добавление цвета.

Если Вам нужен красивый выпадающий список первым делом создайте отдельный лист (Sheet) и в столбик выпишите все опции, которые хотите видеть в данном списке.

1. Пишите в том порядке, в котором хотите увидеть в списке. А вот раскрашиваю я исключительно для наглядности. По-настоящему цвет задаётся на другом этапе.

предварительный вид выпадающего списка

2. Щелкните все выделенные данные правой кнопкой мыши и выберите команду Присвоить имя (Define Name).

предварительный вид выпадающего списка

3. В поле Имя (Name) введите имя записей, например Результаты (Results), и нажмите кнопку ОК.

Убедитесь, что имя не содержит пробелы. Это имя не будет отображаться в списке, но его нужно ввести, чтобы связать с раскрывающимся списком.

выбор названия для выпадающего списка

4. Щелкните ячейку на листе, в которую требуется поместить раскрывающийся список.

выбор название для выпадающего списка

5. На вкладке Параметры (Settings) в поле Разрешить (Allow) нажмите кнопку Список (List).

указание источника для выпадающего списка

6. В поле Источник (Source) введите знак равенства
(=), а сразу за ним — имя, присвоенное списку в шаге 3. Например: =Results.

указание источника для выпадающего списка

7. Нажмите ОК

указание источника для выпадающего списка

8. В выбранной ячейке появится список. Пока что чёрно-белый.

выпадающий список

В начало страницы

Редактирование выпадающего списка

Изменение раскрывающегося списка, основанного на именованном диапазоне.

Откройте лист, содержащий именованный диапазон для раскрывающегося списка.

Мой список уже раскрашен, но на добавление нового элемента это никак не влияет.

Чтобы добавить элемент, перейдите в конец списка и введите новый элемент.

выпадающий список добавление элемента

На вкладке Формулы (Formulas) нажмите кнопку Диспетчер имен (Name Manager).

выпадающий список добавление элемента

В поле Диспетчер имен (Name Manager) выберите именованный диапазон,
который требуется обновить.

выпадающий список добавление элемента

Изменяем диапазон. Я заменил 7 на 8.

выпадающий список добавление элемента

Затем добавляем цвет если нужно.

Чтобы посмотреть список всех доступных диапазонов нажминте CTRL + G или из вкладки Home перейдите в Find & Select и нажмите Go to:

выпадающий список диапазоны

Список будет выглядеть примерно так:

выпадающий список диапазоны

В начало страницы

Добавление цвета в выпадающие ячейки

Чтобы сделать список цветным выделяем ячейку. Переходим в Home → Условное форматирование (Conditional Formatting) → Новое правило (New Rule)

выпадающий список

Format only cells that contain → Меняем условие на equal to Вводим первый элемент из нашего списка в данном случае OK → Format

форматирование элемента выпадающего списка

Я хочу, чтобы у варианта OK был зелёный фон.

форматирование элемента выпадающего списка

Проверяем

зелёный фон элемента выпадающего списка

Чтобы раскрасить все элементы выпадающего списка перейдём в редактирование правила.

Conditional Formattiong → Manage Rules

редактирование правила для выпадающего списка

Создаем новое правило (New Rule) для каждого элемента списка. И так пока не создадите все необходимые правила. Я создал семь правил.

редактирование правила для выпадающего списка

Проверяем созданный список правил.

редактирование правила для выпадающего списка

После того как одна ячейка готова, её можно скопировать в любое место документа и пользоваться цветным списком в своё удовольствие.

редактирование правила для выпадающего списка

Возможные проблемы

При переносе листа из одного файла в другой имя, на которое ссылается ячейка может оказаться недоступным. Проверьте Ваши ячейки с помощью Data Validation и исправьте имя на актуальное, либо создайте новое.




Share in social media: