Введение | |
Создание выпадающего меню | |
Редактирование выпадающего меню | |
Раскрасить список | |
Условное форматирование ячеек | |
Возможные проблемы | |
Похожие статьи |
Введение
Из этой статьи Вы узнаете как создать выпадающий список в Excel и раскрасить его.
В первой части я рассказываю о создании выпадающего списка, но если Вы уже знакомы с этим
можете сразу переходить ко второй, в которой разобрано добавление цвета.
Если Вам нужен красивый выпадающий список первым делом создайте отдельный лист (Sheet)
и в столбик выпишите все опции, которые хотите видеть в данном списке.
Пишите в том порядке, в котором хотите увидеть в списке. Раскрашивать пока не обязательно.
По-настоящему цвет задаётся на другом этапе.
Создание выпадающего меню
1. Выпишите в столбец опции, которые Вам нужны в выпадающем списке
www.andreyolegovich.ru
2. Выделите всё, что написали и кликните правой кнопкой мыши → Выберите команду
Присвоить имя (Define Name).
www.andreyolegovich.ru
3. В поле Имя (Name) введите имя записей, например Результаты
(Results), и нажмите кнопку ОК.
Убедитесь, что имя не содержит пробелы.
Это имя не будет отображаться в списке, но его нужно ввести,
чтобы связать с раскрывающимся списком.
www.andreyolegovich.ru
4. Щелкните ячейку на листе, в которую требуется поместить раскрывающийся список.
Перейдите в раздел Data и нажмите Data Validation.
Если в Вашей версии Excel надписи Data Validation нет — ищите значок
5. На вкладке Параметры (Settings) в поле
Разрешить (Allow) нажмите кнопку Список (List).
www.andreyolegovich.ru
6. В поле Источник (Source) введите знак равенства
(=), а сразу за ним — имя, присвоенное списку в шаге 3. Например: =Results.
www.andreyolegovich.ru
7. Нажмите ОК
www.andreyolegovich.ru
8. В выбранной ячейке появится список. Пока что чёрно-белый.
www.andreyolegovich.ru
Редактирование выпадающего списка
Изменение раскрывающегося списка, основанного на именованном диапазоне.
Откройте лист, содержащий именованный диапазон для раскрывающегося списка.
Мой список уже раскрашен, но на добавление нового элемента это никак не влияет.
Чтобы добавить элемент, перейдите в конец списка и введите новый элемент.
www.andreyolegovich.ru
На вкладке Формулы (Formulas) нажмите кнопку Диспетчер имен (Name Manager).
www.andreyolegovich.ru
В поле Диспетчер имен (Name Manager) выберите именованный диапазон, который требуется обновить.
www.andreyolegovich.ru
Изменяем диапазон. Я заменил 7 на 8.
www.andreyolegovich.ru
Затем добавляем цвет если нужно.
Чтобы посмотреть список всех доступных диапазонов нажминте CTRL + G или из вкладки Home перейдите
в Find & Select и нажмите Go to:
Список будет выглядеть примерно так:
www.andreyolegovich.ru
Добавление цвета в выпадающие ячейки
Для добавления цвета нужно будет пользоваться условным форматированием.
Суть такова — создаётся правило, которое добавляет ячейке цвет, в зависимости
от того, что в ней написано.
Условное форматирование ячеек
Чтобы сделать список цветным выделяем ячейку. Переходим в Home → Условное форматирование (Conditional Formatting)
→ Новое правило (New Rule)
Выбираем Format only cells that contain → Меняем условие на equal to Вводим первый элемент из нашего списка
в данном случае OK
→ Format
www.andreyolegovich.ru
Я хочу, чтобы у варианта OK был зелёный фон.
Проверяем
Чтобы раскрасить все элементы выпадающего списка перейдём в редактирование правила.
Conditional Formattiong → Manage Rules
Создаем новое правило (New Rule) для каждого элемента списка. И так пока не создадите все необходимые
правила. Я создал семь правил.
Проверяем созданный список правил.
После того как одна ячейка готова, её можно скопировать в любое место документа и пользоваться цветным списком в своё удовольствие.
Обучение
Возможные проблемы
При переносе листа из одного файла в другой имя, на которое ссылается ячейка может
оказаться недоступным. Проверьте Ваши ячейки с помощью Data Validation и
исправьте имя на актуальное, либо создайте новое.
Создание выпадающего меню |
|
Редактирование выпадающего меню |
|
Условное форматирование ячеек |
|
Раскрасить список |
|
Возможные проблемы |
MS Excel | |
VBA | |
Чередование цвета в строках | |
Режим разработчика | |
Цветной выпадающий список | |
Сортировка чисел | |
Всё пропало | |
Перенос строки внутри ячейки Excel | |
Excel не фильтрует столбец |
В Excel создание раскрывающегося списка может вам очень помочь, и иногда вам нужно закодировать значения раскрывающегося списка цветом в зависимости от соответствующего выбранного. Например, я создал раскрывающийся список названий фруктов, когда я выбираю Apple, мне нужно, чтобы ячейка автоматически окрашивалась в красный цвет, а когда я выбираю оранжевый, ячейка может быть окрашена в оранжевый цвет, как показано на следующем снимке экрана. Есть ли какие-нибудь хорошие предложения по решению этой проблемы?
Метод A Раскрывающийся список с цветовой кодировкой и условным форматированием
Метод B Раскрывающийся список с цветовой кодировкой и удобный инструмент Цветной раскрывающийся список
Для завершения этой задачи нам нужно сначала создать раскрывающийся список, выполните следующие действия:
Сначала создайте раскрывающийся список:
1. Создайте список данных и выберите диапазон, в который вы хотите поместить значения раскрывающегося списка. В этом случае я выбираю диапазон A2: A6, чтобы разместить раскрывающийся список, см. Снимок экрана:
2. Нажмите Данные > проверка достоверности данных > проверка достоверности данных, см. снимок экрана:
3. А в проверка достоверности данных диалоговое окно, нажмите Настройки и выберите Список из файла Разрешить раскрывающийся список, а затем щелкните, чтобы выбрать значения списка, которые вы хотите использовать. Смотрите скриншот:
4. Затем нажмите OK, раскрывающийся список был создан, как показано ниже:
Теперь вы можете добавить цвет в раскрывающийся список, выбрав нужный вам метод.
Метод A Раскрывающийся список с цветовой кодировкой и условным форматированием
1. Выделите раскрывающиеся ячейки (здесь столбец A) и нажмите Главная > Условное форматирование > Новое правило, см. снимок экрана:
2. в Новое правило форматирования диалоговое окно, нажмите Форматировать только ячейки, содержащие вариант в Выберите тип правила раздел под Форматировать только ячейки с раздел, выбрать Конкретный текст из первого раскрывающегося списка и выберите содержащий из второго раскрывающегося списка, затем щелкните кнопку, чтобы выбрать значение, которое вы хотите отформатировать для определенного цвета, см. снимок экрана:
3. Затем нажмите Формат кнопку и выберите понравившийся цвет из Заполнять меню.
4. Затем щелкните OK > OK чтобы закрыть диалоговые окна, повторите шаги с 5 по 7 для каждого другого раскрывающегося списка, например, Peach для розового, Grape для фиолетового…
5. После установки цветов для значений, когда вы выбираете любое значение из раскрывающегося меню, ячейка будет автоматически окрашена в указанный цвет.
Метод B Раскрывающийся список с цветовой кодировкой и удобный инструмент Цветной раскрывающийся список
Если вы хотите выполнить эту работу быстрее, вы можете попробовать Цветной раскрывающийся список инструменты Kutools for Excel, который может помочь вам напрямую добавлять цвета к элементам раскрывающегося списка.
После бесплатная установка Kutools for Excel, пожалуйста, сделайте следующее:
1. Выберите ячейки раскрывающегося списка, затем щелкните Кутулс > Раскрывающийся список > Цветной раскрывающийся список.
2. в Цветной раскрывающийся список диалог, сделайте настройки ниже.
1) Отметьте шкалу, к которой вы хотите добавить цвет, в Обращаться к .
Если вы отметите Строка диапазона данных в Обращаться к раздел, вам необходимо выбрать диапазон строк.
2) Поочередно добавляйте цвета к элементам раскрывающегося списка.
Щелкните один элемент в элементах списка, затем щелкните один цвет, который вам нужен, чтобы добавить цвет к выбранному элементу.
Повторите этот шаг, чтобы добавить цвета ко всем элементам.
3. Нажмите Ok. Теперь элементы в раскрывающемся списке окрашены.
Прочие операции (статьи)
Автозаполнение при вводе текста в раскрывающемся списке Excel
Если у вас есть раскрывающийся список проверки данных с большими значениями, вам нужно прокрутить список вниз только для того, чтобы найти нужное, или введите все слово напрямую в поле списка. Если есть способ разрешить автозаполнение при вводе первой буквы в выпадающем списке, все станет проще.
Создать зависимый раскрывающийся список в листе Google
Вставка обычного раскрывающегося списка в лист Google может быть легкой задачей для вас, но иногда вам может потребоваться вставить зависимый раскрывающийся список, что означает второй раскрывающийся список в зависимости от выбора первого раскрывающегося списка.
Создайте динамический раскрывающийся список в алфавитном порядке в Excel
Большинство из вас может знать, как создать динамический раскрывающийся список, но в некоторых случаях вам может потребоваться отсортировать раскрывающийся список в алфавитном порядке, как показано ниже. Теперь в этом руководстве представлен способ создания динамического раскрывающегося списка в алфавитном порядке в Excel.
Лучшие инструменты для работы в офисе
Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
- Объединить ячейки / строки / столбцы и хранение данных; Разделить содержимое ячеек; Объедините повторяющиеся строки и сумму / среднее значение… Предотвращение дублирования ячеек; Сравнить диапазоны…
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
- Избранные и быстро вставляйте формулы, Диапазоны, диаграммы и изображения; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
- Группировка сводной таблицы по номер недели, день недели и другое … Показать разблокированные, заблокированные ячейки разными цветами; Выделите ячейки, у которых есть формула / имя…
Вкладка Office — предоставляет интерфейс с вкладками в Office и значительно упрощает вашу работу
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Выпадающий список в ячейке листа
Видео
У кого мало времени и нужно быстро ухватить суть — смотрим обучающее видео:
Кому интересны подробности и нюансы всех описанных способов — дальше по тексту.
Способ 1. Примитивный
Один щелчок правой кнопкой мыши по пустой ячейке под столбцом с данными, команда контекстного меню Выбрать из раскрывающегося списка (Choose from drop-down list) или нажать сочетание клавиш ALT+стрелка вниз. Способ не работает, если ячейку и столбец с данными отделяет хотя бы одна пустая строка или вам нужен товар, который еще ни разу не вводился выше:
Способ 2. Стандартный
- Выделите ячейки с данными, которые должны попасть в выпадающий список (например, наименованиями товаров).
- Если у вас Excel 2003 или старше — выберите в меню Вставка — Имя — Присвоить (Insert — Name — Define), если Excel 2007 или новее — откройте вкладку Формулы (Formulas) и воспользуйтесь кнопкой Диспетчер имен (Name Manager), затем Создать. Введите имя (можно любое, но обязательно без пробелов и начать с буквы!) для выделенного диапазона (например Товары). Нажмите ОК.
- Выделите ячейки (можно сразу несколько), в которых хотите получить выпадающий список и выберите в меню (на вкладке) Данные — Проверка (Data — Validation). Из выпадающего списка Тип данных (Allow) выберите вариант Список (List) и введите в строчку Источник (Source) знак равенства и имя диапазона (т.е. =Товары).
Нажмите ОК.
Все! Наслаждайтесь!
Важный нюанс. В качестве источника данных для списка может выступать и динамический именованный диапазон, например прайс-лист. Тогда при дописывании новых товаров к прайсу, они будут автоматически добавляться к выпадающему списку. Еще одним часто используемым трюком для таких списков является создание связанных выпадающих списков (когда содержимое одного списка меняется в зависимости от выбора в другом).
Способ 3. Элемент управления
Этот способ представляет собой вставку на лист нового объекта — элемента управления «поле со списком» с последующей привязкой его к диапазонам на листе. Для этого:
- В Excel 2007/2010 откройте вкладку Разработчик (Developer). В более ранних версиях — панель инструментов Формы (Forms) через меню Вид — Панели инструментов — Формы (View — Toolbars — Forms). Если этой вкладки не видно, то нажмите кнопку Офис — Параметры Excel — флажок Отображать вкладку Разработчик на ленте (Office Button — Excel Options — Show Developer Tab in the Ribbon)
- Найдите значок выпадающего списка среди элементов управления форм (не ActiveX!). Ориентируйтесь по всплывающим подсказкам — Поле со списком:
Щелкните по значку и нарисуйте небольшой горизонтальный прямоугольник — будущий список. - Щелкните по нарисованному списку правой кнопкой мыши и выберите команду Формат объекта (Format control). В появившемся диалоговом окне задайте
- Формировать список по диапазону — выделите ячейки с наименованиями товаров, которые должны попасть в список
- Связь с ячейкой — укажите ячейку куда нужно выводить порядковый номер выбранного пользователем элемента.
- Количество строк списка — сколько строк показывать в выпадающем списке. По умолчанию — 8, но можно больше, чего не позволяет предыдущий способ.
После нажатия на ОК списком можно пользоваться.
Чтобы вместо порядкового номера элемента выводилось его название можно дополнительно использовать функцию ИНДЕКС (INDEX), которая умеет выводить содержимое нужной по счету ячейки из диапазона:
Способ 4. Элемент ActiveX
Этот способ частично напоминает предыдущий. Основное отличие в том, что на лист добавляется не элемент управления, а элемент ActiveX «Поле со списком» из раскрывающегося набора под кнопкой Вставить (Insert) с вкладки Разработчик (Developer):
Механизм добавления тот же — выбираем объект из списка и рисуем его на листе. А вот дальше начинаются серьезные отличия от предыдущего способа.
Во-первых, созданный выпадающий ActiveX список может находится в двух принципиально разных состояниях — режиме отладки, когда можно настраивать его параметры и свойства, двигать его по листу и менять размеры и — режиме ввода, когда единственное, что можно — выбирать из него данные. Переключение между этими режимами происходит с помощью кнопки Режим Конструктора (Design Mode) на вкладке Разработчик (Developer):
Если эта кнопка нажата, то мы можем настраивать параметры выпадающего списка, нажав соседнюю кнопку Свойства (Properties), которая откроет окно со списком всех возможных настроек для выделенного объекта:
Самые нужные и полезные свойства, которые можно и нужно настроить:
- ListFillRange — диапазон ячеек, откуда берутся данные для списка. Выделить мышью диапазон он не даст, надо просто вписать его руками с клавиатуры (например, Лист2!A1:A5)
- LinkedCell — связанная ячейка, куда будет выводиться выбранный из списка элемент
- ListRows — количество отображаемых строк
- Font — шрифт, размер, начертание (курсив, подчеркивание и т.д. кроме цвета)
- ForeColor и BackColor — цвет текста и фона, соответственно
Большим и жирным плюсом этого способа является возможность быстрого перехода к нужному элементу в списке при вводе первых букв с клавиатуры(!), чего нет у всех остальных способов. Приятным моментом, также, является возможность настройки визуального представления (цветов, шрифтов и т.д.)
При использовании этого способа, также возможно указывать в качестве ListFillRange не только одномерные диапазоны. Можно, например задать диапазон из двух столбцов и нескольких строк, указав дополнительно, что выводить нужно два столбца (свойство ColumnCount=2). Тогда можно получить весьма привлекательные результаты, окупающие все потраченные на дополнительные настройки усилия:
Итоговая сравнительная таблица всех способов
Способ 1. Примитивный | Способ 2. Стандартный | Способ 3. Элемент управления | Способ 4. Элемент ActiveX | |
Сложность | низкая | средняя | высокая | высокая |
Возможность настройки шрифта, цвета и т.д. | нет | нет | нет | да |
Количество отображаемых строк | всегда 8 | всегда 8 | любое | любое |
Быстрый поиск элемента по первым буквам | нет | нет | нет | да |
Необходимость использования дополнительной функции ИНДЕКС | нет | нет | да | нет |
Возможность создания связанных выпадающих списков | нет | да | нет | нет |
Ссылки по теме:
- Выпадающий список с данными из другого файла
- Создание зависимых выпадающих списков
- Автоматическое создание выпадающих списков надстройкой PLEX
- Выбор фото из выпадающего списка
- Автоматическое удаление уже использованных элементов из выпадающего списка
- Выпадающий список с автоматическим добавлением новых элементов
Под выпадающим списком понимается содержание в одной ячейке нескольких значений. Когда пользователь щелкает по стрелочке справа, появляется определенный перечень. Можно выбрать конкретное.
Очень удобный инструмент Excel для проверки введенных данных. Повысить комфорт работы с данными позволяют возможности выпадающих списков: подстановка данных, отображение данных другого листа или файла, наличие функции поиска и зависимости.
Создание раскрывающегося списка
Путь: меню «Данные» — инструмент «Проверка данных» — вкладка «Параметры». Тип данных – «Список».
Ввести значения, из которых будет складываться выпадающий список, можно разными способами:
- Вручную через «точку-с-запятой» в поле «Источник».
- Ввести значения заранее. А в качестве источника указать диапазон ячеек со списком.
- Назначить имя для диапазона значений и в поле источник вписать это имя.
Любой из вариантов даст такой результат.
Выпадающий список в Excel с подстановкой данных
Необходимо сделать раскрывающийся список со значениями из динамического диапазона. Если вносятся изменения в имеющийся диапазон (добавляются или удаляются данные), они автоматически отражаются в раскрывающемся списке.
- Выделяем диапазон для выпадающего списка. В главном меню находим инструмент «Форматировать как таблицу».
- Откроются стили. Выбираем любой. Для решения нашей задачи дизайн не имеет значения. Наличие заголовка (шапки) важно. В нашем примере это ячейка А1 со словом «Деревья». То есть нужно выбрать стиль таблицы со строкой заголовка. Получаем следующий вид диапазона:
- Ставим курсор в ячейку, где будет находиться выпадающий список. Открываем параметры инструмента «Проверка данных» (выше описан путь). В поле «Источник» прописываем такую функцию:
Протестируем. Вот наша таблица со списком на одном листе:
Добавим в таблицу новое значение «елка».
Теперь удалим значение «береза».
Осуществить задуманное нам помогла «умная таблица», которая легка «расширяется», меняется.
Теперь сделаем так, чтобы можно было вводить новые значения прямо в ячейку с этим списком. И данные автоматически добавлялись в диапазон.
- Сформируем именованный диапазон. Путь: «Формулы» — «Диспетчер имен» — «Создать». Вводим уникальное название диапазона – ОК.
- Создаем раскрывающийся список в любой ячейке. Как это сделать, уже известно. Источник – имя диапазона: =деревья.
- Снимаем галочки на вкладках «Сообщение для ввода», «Сообщение об ошибке». Если этого не сделать, Excel не позволит нам вводить новые значения.
- Вызываем редактор Visual Basic. Для этого щелкаем правой кнопкой мыши по названию листа и переходим по вкладке «Исходный текст». Либо одновременно нажимаем клавиши Alt + F11. Копируем код (только вставьте свои параметры).
- Сохраняем, установив тип файла «с поддержкой макросов».
- Переходим на лист со списком. Вкладка «Разработчик» — «Код» — «Макросы». Сочетание клавиш для быстрого вызова – Alt + F8. Выбираем нужное имя. Нажимаем «Выполнить».
Private Sub Worksheet_Change(ByVal Target As Range) Dim lReply As Long If Target.Cells.Count > 1 Then Exit Sub If Target.Address = "$C$2" Then If IsEmpty(Target) Then Exit Sub If WorksheetFunction.CountIf(Range("Деревья"), Target) = 0 Then lReply = MsgBox("Добавить введенное имя " & _ Target & " в выпадающий список?", vbYesNo + vbQuestion) If lReply = vbYes Then Range("Деревья").Cells(Range("Деревья").Rows.Count + 1, 1) = Target End If End If End If End Sub
Когда мы введем в пустую ячейку выпадающего списка новое наименование, появится сообщение: «Добавить введенное имя баобаб в выпадающий список?».
Нажмем «Да» и добавиться еще одна строка со значением «баобаб».
Выпадающий список в Excel с данными с другого листа/файла
Когда значения для выпадающего списка расположены на другом листе или в другой книге, стандартный способ не работает. Решить задачу можно с помощью функции ДВССЫЛ: она сформирует правильную ссылку на внешний источник информации.
- Делаем активной ячейку, куда хотим поместить раскрывающийся список.
- Открываем параметры проверки данных. В поле «Источник» вводим формулу: =ДВССЫЛ(“[Список1.xlsx]Лист1!$A$1:$A$9”).
Имя файла, из которого берется информация для списка, заключено в квадратные скобки. Этот файл должен быть открыт. Если книга с нужными значениями находится в другой папке, нужно указывать путь полностью.
Как сделать зависимые выпадающие списки
Возьмем три именованных диапазона:
Это обязательное условие. Выше описано, как сделать обычный список именованным диапазоном (с помощью «Диспетчера имен»). Помним, что имя не может содержать пробелов и знаков препинания.
- Создадим первый выпадающий список, куда войдут названия диапазонов.
- Когда поставили курсор в поле «Источник», переходим на лист и выделяем попеременно нужные ячейки.
- Теперь создадим второй раскрывающийся список. В нем должны отражаться те слова, которые соответствуют выбранному в первом списке названию. Если «Деревья», то «граб», «дуб» и т.д. Вводим в поле «Источник» функцию вида =ДВССЫЛ(E3). E3 – ячейка с именем первого диапазона.
- Создаем стандартный список с помощью инструмента «Проверка данных». Добавляем в исходный код листа готовый макрос. Как это делать, описано выше. С его помощью справа от выпадающего списка будут добавляться выбранные значения.
- Чтобы выбранные значения показывались снизу, вставляем другой код обработчика.
- Чтобы выбираемые значения отображались в одной ячейке, разделенные любым знаком препинания, применим такой модуль.
- На вкладке «Разработчик» находим инструмент «Вставить» – «ActiveX». Здесь нам нужна кнопка «Поле со списком» (ориентируемся на всплывающие подсказки).
- Щелкаем по значку – становится активным «Режим конструктора». Рисуем курсором (он становится «крестиком») небольшой прямоугольник – место будущего списка.
- Жмем «Свойства» – открывается перечень настроек.
- Вписываем диапазон в строку ListFillRange (руками). Ячейку, куда будет выводиться выбранное значение – в строку LinkedCell. Для изменения шрифта и размера – Font.
Выбор нескольких значений из выпадающего списка Excel
Бывает, когда из раскрывающегося списка необходимо выбрать сразу несколько элементов. Рассмотрим пути реализации задачи.
Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Not Intersect(Target, Range("Е2:Е9")) Is Nothing And Target.Cells.Count = 1 Then Application.EnableEvents = False If Len(Target.Offset(0, 1)) = 0 Then Target.Offset(0, 1) = Target Else Target.End(xlToRight).Offset(0, 1) = Target End If Target.ClearContents Application.EnableEvents = True End If End Sub
Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Not Intersect(Target, Range("Н2:К2")) Is Nothing And Target.Cells.Count = 1 Then Application.EnableEvents = False If Len(Target.Offset(1, 0)) = 0 Then Target.Offset(1, 0) = Target Else Target.End(xlDown).Offset(1, 0) = Target End If Target.ClearContents Application.EnableEvents = True End If End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("C2:C5")) Is Nothing And Target.Cells.Count = 1 Then
Application.EnableEvents = False
newVal = Target
Application.Undo
oldval = Target
If Len(oldval) <> 0 And oldval <> newVal Then
Target = Target & "," & newVal
Else
Target = newVal
End If
If Len(newVal) = 0 Then Target.ClearContents
Application.EnableEvents = True
End If
End Sub
Не забываем менять диапазоны на «свои». Списки создаем классическим способом. А всю остальную работу будут делать макросы.
Выпадающий список с поиском
Скачать пример выпадающего списка
При вводе первых букв с клавиатуры высвечиваются подходящие элементы. И это далеко не все приятные моменты данного инструмента. Здесь можно настраивать визуальное представление информации, указывать в качестве источника сразу два столбца.
Помогаю со студенческими работами здесь
Заголовок разных цветов
Как реализовать на jQuery следующий эффект:
Двухсловный заголовок
Трех словный заголовок
Т.е….
TextBox, слова разных цветов
Помогите пожалуйста
Мне нужно чтобы когда в TextBox написал слово Good, то оно поменяет цвет на…
Нарисовать прямоугольники разных цветов
V ekrane risujeca raznix cvetov priamougolniki, ( v priamougolnike priamougolnik), kogda…
В урне шары разных цветов
В урне 12 красных, 18 синих и 7 зеленых шаров. Из урны вынимаются 7 шаров. Найти вероятность того,…
Олимпийские кольца разных цветов
Здраствуйте:)
Как в ассемблере реализовать Олимпийские кольца.
5 окружностей, разных цветов.
Chrome ссылки разных цветов
Помогите пожалуйста Задать цвет гиперссылок по умолчанию: темно-синий для посещенных и…
Искать еще темы с ответами
Или воспользуйтесь поиском по форуму: