Excel фото с выпадающим списком

Выбор фото из выпадающего списка

Постановка задачи

Необходимо сделать так, чтобы в одной из ячеек листа был выпадающий список с наименованиями, при выборе из которого, товар отображался бы рядом в виде фотографии:

Видео

Шаг 1. Создаем каталог с фото и даем ему имя

Создаем на Листе 1 мы каталог с наименованиями и фотографиями товаров, состоящий из двух столбцов (Модель и Фото):

Теперь надо дать имя нашему каталогу, чтобы ссылаться на него в будущем. В Excel 2003 и старше для этого идем в меню Вставка — Имя — Присвоить (Insert — Name — Define), а в Excel 2007 и новее — жмем на кнопку Диспетчер имен (Name Manager) на вкладке Формулы (Formulas). Создаем диапазон — вводим имя (например Фотоальбом) и в качестве адреса указываем формулу:

=СМЕЩ(Лист1!$A$1;1;0;СЧЁТЗ(Лист1!$A:$A)-1;1)

=OFFSET(Лист1!$A$1;1;0;COUNTA(Лист1!$A:$A)-1;1)

Эта формула определяет последнюю занятую ячейку в столбце А и выдает на выходе диапазон с А2 до этой найденной ячейки. Такая относительно сложная конструкция нужна, чтобы впоследствии дописывать новые модели к нашему списку и не думать об исправлении диапазона. Если дописывать точно ничего не придется, то можете вместо ввода этой страшноватой формулы просто указать =A2:A5

Шаг 2. Выпадающий список для выбора модели

Перейдем на Лист 2 и создадим там ячейку с выпадающим списком для выбора пользователем модели телефона (пусть это будет A1). Выделяем ячейку и идем в меню Данные — Проверка (Data — Validation) или в новых версиях Excel — на вкладку Данные — Проверка данных (Data — Data Validation). Далее в поле Тип данных (Allow) выбираем Список (List), а в качестве Источника (Source) указываем наш Фотоальбом (не забудьте перед ним добавить знак равенства):

Кроме того этой ячейке удобно дать имя — снова меню Вставка — Имя — Присвоить и далее вводим имя (например Выбор) и ОК.

Шаг 3. Копируем фотографию

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

в Excel 2003 и старше —  удерживая Shift, откройте меню Правка (Edit). Там должен появиться невидимый ранее пункт Копировать рисунок (Copy as Picture):

В Excel 2007 и новее можно просто развернуть выпадающий список под кнопкой Копировать (Copy) на Главной (Home) вкладке:

В Excel 2010 появится еще одно дополнительное окно с выбором типа создаваемого изображения:

В нем нужно выбрать варианты «как на экране» и «растровый».

Копируем, переходим на Лист 2 к выпадающему списку и в любую пустую ячейку недалеко от него вставляем наш мини-скриншот ячейки с фотографией (меню Правка — Вставить или обычное CTRL+V).

Шаг 4. Создаем динамическую ссылку на выбранную фотографию

Теперь необходимо сделать ссылку, которая будет указывать на ячейку с выбранной фотографией. Открываем меню Вставка — Имя — Присвоить (Insert — Name — Define) или Диспетчер имен (Name Manager) на вкладке Формулы (Formulas) и создаем еще один именованный диапазон:

Имя нашей ссылки, допустим, будет Фото, а формула

=СМЕЩ(Лист1!$B$2;ПОИСКПОЗ(Выбор;Фотоальбом;0)-1;0;1;1)

=OFFSET(Лист1!$B$2;MATCH(Выбор;Фотоальбом;0)-1;0;1;1)

Технически, функция ПОИСКПОЗ (MATCH) находит ячейку с нужной моделью в каталоге по названию, а функция СМЕЩ (OFFSET) затем выдает ссылку на соседнюю справа от найденного названия ячейку, т.е. ячейку с фотографией товара.

Шаг 5. Привязываем фотографию к ссылке

Осталось выделить скопированную фотографию на Листе 2 и вписать в строку формул

=Фото

и нажать Enter

Все!

Ссылки по теме 

• Создание выпадающего списка в ячейках листа 
• Создание зависимых выпадающих списков 
• Автоматическое создание выпадающих списков при помощи инструментов надстройки PLEX 
• Выпадающий список с автоматическим удалением уже использованных элементов
• Выпадающий список с автоматическим добавлением недостающих элементов

---

Вставка изображений из ячеек (выпадающий список)

Итак, как сделать, что бы в ячейке появлялось изображение, соответствующее значению, например так: ? Шаг первый: Создаём список значений и их графических соответствий, например так: Шаг второй: Создаём выпадающий список в ячейке. Шаг третий: Создаём (Ctrl+F3) именованый диапазон, содержащий ссылки на изображения Шаг четвёртый : Вставляем любое изображение туда, где мы хотим видеть результат Шаг пятый: Выделяем это изображение, переходим в строку формул и пишем название именованого диапазона после знака = Готово!

1 2 3 4 5 Категория: Выпадающие списки | Добавил: Serge_007 (05.01.2012)

Просмотров: 55153 | Комментарии: 39 | Теги: вставка, выпадающий список, картинки | Рейтинг: 3.3/3

Всего комментариев: 39	1 2 »
Порядок вывода комментариев:    Здравствуйте! Не удается совладать с этим приемом. А точнее с последним пунктом. Никак не укладывается в голове как можно выделить картинку и при этом ввести еще что-то в строку формул. У меня строка формул к примеру блокируется во время выделения картинки. Заранее спасибо за ответ!    F2 необязательно. Можно просто курсором в строку формул встать    Вит, я выложу видео, на нём будет видно подробнее ЗЫ Файл скачайте и тогда убедитесь что всё работает ЗЫЗЫ Формула появляется на третьем шаге, на картинке это видно    У всех картинок формат одинаковый — Jpeg, разный только размер Цитата (Вит) люди копируют эти картинки из A1 в B5 — в которой соответственно не возможно вставить в строке формул название Logo Да что мешает-то? Ткнули мышкой в картинку — она выделилась, потом ткнули мышкой в строку формул — и пишите в ней необходимое Вит, Вы бы потрудились сначала скачать файл-пример и повторить пошагово по статье. Ничего сложного в этом приёме нет, он доступен даже новичку ЗЫ С одним согласен: Формулу именованого диапазона надо было не только на картинке показать, но и в тексте. Исправлю. А так же довложу видео 7    Вит   (15.03.2013 16:40) [ Материал]    Файл скачан и проверен, но те картинки которые в ячейках A1 и A2 — не получается (так что Ваше: «Ткнули мышкой в картинку — она выделилась, потом ткнули мышкой в строку формул», с картинками в яч. A1 и A2 — не возможно вбить в строку формул данные, при активных картинках) — с картинкой которая в ячейке B5 — НЕТ проблем, в том и дело в чем разница с теми двумя картинками…. Вы так и не поняли проблему….. P.S. Свойства разные у картинок в ячейках A1,A2 с картинкой в ячейке B5 = Почему?!    И последнее. Вит, а почему Вы вообще прицепились к А1 и А2? Ведь мы начинаем с того что создаём список значений и их графических соответствий в диапазоне А1:В2 (это отчетливо видно на картинках). А на четвёртом шаге вставляем любое изображение туда, где мы хотим видеть результат. Но мы ведь не можем хотеть видеть результат там где он уже есть, там откуда мы его и взяли. Какая логика-то в этом? 9    Андрей   (26.06.2013 14:06) [ Материал]    не активна строка формул когда выделяю картинку,что сделать? 10    Андрей   (26.06.2013 14:17) [ Материал]    блокируется строка формул 12    Андрей   (26.06.2013 15:31) [ Материал]    когда выделяю картинку и навожу курсор на строку,то ничего нельзя ввести 13    Андрей   (26.06.2013 15:34) [ Материал]    вроде надо зажимать какую-то вспомогательную клавишу,но не F2 и не shift это не срабатывает    Можно. Посмотрите видео, которое я выкладывал несколькими комментами выше 15    Андрей   (26.06.2013 16:42) [ Материал]    ну а что делать то? не активна строка хоть тресни,или что-то при копировании    Снимите своё видео, на котором будет видна Ваша проблема и выложите его сюда. Поможем 17    Андрей   (26.06.2013 16:54) [ Материал]    как здесь добавлять? не вижу на форуме 18    Андрей   (26.06.2013 16:59) [ Материал]    проблема в том что при выделенной картинке в строку формул нельзя внести НИЧЕГО,на ней не отображается курсор 19    Андрей   (26.06.2013 17:03) [ Материал]    видео наверное может выкладывать только администратор сайта,для пользователя не видно опции    Так же как и я добавил — выложить видео на какой-нибудь ресурс (я выкладывал на YouTube), а сюда ссылку    К сожалению на видео не видно курсора, но если принять за истину что у Вас заблокирована строка формул, то пишите мне в личку. Свяжемся по TeamViewer и устраним этот баг(?) 23    Андрей   (26.06.2013 19:47) [ Материал]    курсора в строке формул не отображается потому что он исчезает при попадании в строку формул,у меня уже было такое,и была какая-то хитрость,которую я не помню,и как написать вам в личку,почта скрыта,TeamViewer у меня установлен 24    Андрей   (27.06.2013 10:06) [ Материал]    проблема осталась и пока не решили,раньше я находил на каком-то форуме очень простое решение,наверное тот форум закрыли
1-25 26-39

В Excel мы можем быстро и легко создать раскрывающийся список со значениями ячеек, но пробовали ли вы когда-нибудь создать раскрывающийся список с изображениями, то есть, когда вы щелкаете одно значение из раскрывающегося списка, его относительное изображение будет отображаться сразу, как показано ниже. В этой статье я расскажу о том, как вставить выпадающий список с изображениями в Excel.

Создайте раскрывающийся список с изображением с помощью функции именованного диапазона

Создавайте несколько раскрывающихся списков с изображениями с помощью мощной функции

Вставка нескольких изображений на основе значений ячеек с полезной функцией

---

Создайте раскрывающийся список с изображением с помощью функции именованного диапазона

Обычно вы можете создать именованный диапазон, а затем использовать связанный рисунок для решения этой задачи в Excel.

1. Во-первых, вы должны создать два столбца, которые содержат значения ячеек и их относительные изображения, см. Снимок экрана:

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

2. Затем вам нужно создать раскрывающийся список со значениями ячеек, щелкните одну ячейку, в которой вы хотите вывести значение раскрывающегося списка, а затем щелкните Данные > проверка достоверности данных > проверка достоверности данных, см. снимок экрана:

3. В проверка достоверности данных диалоговое окно под Настройки , выберите Список из Разрешить раскрывающийся список, а затем выберите значения ячеек, которые вы хотите создать в раскрывающемся списке под Источник разделе., см. снимок экрана:

4. Затем нажмите OK и создан раскрывающийся список со значениями ячеек, выберите один элемент из раскрывающегося списка, см. снимок экрана:

5, Затем нажмите Формулы > Определить имя, см. снимок экрана:

6. В Новое имя диалоговом окне выполните следующие действия:

• Введите имя под названием мой образ в Имя и фамилия текстовое окно;
• Затем скопируйте и вставьте эту формулу: =INDEX(Sheet1!$A$2:$B$6,MATCH(Sheet1!$E$2,Sheet1!$A$2:$A$6,0),2) в текстовое поле Ссылается на.

7, Затем нажмите OK чтобы закрыть диалог. Затем вам нужно скопировать и вставить соответствующее изображение на основе значения ячейки в E2 из исходного диапазона в ячейку F2, см. Снимок экрана:

8. Затем вы должны выбрать изображение в ячейке F2, а затем ввести эту формулу = myimage (мой образ — это имя диапазона, которое вы назвали на шаге 5) в строке формул, см. снимок экрана:

9. После ввода формулы нажмите Enter клавиша, и теперь, когда вы выбираете один элемент из выпадающего списка, его относительное изображение будет отображаться немедленно. Смотрите скриншот:

---

Создавайте несколько раскрывающихся списков с изображениями с помощью мощной функции

Если у вас есть Kutools for Excel, С его Раскрывающийся список изображений функцию, вы можете создать несколько раскрывающихся списков с их относительными изображениями всего за несколько щелчков мышью.

Примечание:Чтобы применить это Раскрывающийся список изображений, во-первых, вы должны скачать Kutools for Excel, а затем быстро и легко примените эту функцию.

После установки Kutools for Excel, пожалуйста, сделайте так:

1. Во-первых, вы должны создать два столбца, которые будут содержать значения и относительные изображения на вашем листе.

2. А затем нажмите Кутулс > Раскрывающийся список > Раскрывающийся список изображений, см. снимок экрана:

3. В Раскрывающийся список изображений В диалоговом окне, если вы создали столбцы значений ячеек и изображений, проигнорируйте шаг 1, затем выберите исходные данные и диапазон изображений и диапазон вывода, см. снимок экрана:

4. А затем нажмите Ok При нажатии кнопки раскрывающиеся списки с изображениями были созданы в выбранных ячейках, и при выборе элемента из раскрывающейся ячейки соответствующее изображение будет отображаться, как показано ниже в демонстрации:

Бесплатная загрузка Kutools for Excel от Yhao сейчас!

---

Вставка нескольких изображений на основе значений ячеек с полезной функцией

Чтобы быстро вставить относительные изображения на основе значений ячеек, не вставляя их по одному, я могу порекомендовать мощный инструмент —Kutools for Excel, С его Сопоставить Импорт изображений Утилита, вы можете закончить эту работу удобно.

После установки Kutools for Excel, пожалуйста, сделайте так:

1. Нажмите Кутулс Плюс > Импорт Экспорт > Сопоставить Импорт изображений, см. снимок экрана:

2. В Сопоставить Импорт изображений диалоговом окне выполните следующие действия:

• Выберите значения ячеек, в которые вы хотите вставить изображения на основе под Диапазон соответствия текстовое поле;
• Затем нажмите Добавить кнопка для выбора и вставки соответствующих картинок в список;
• Затем нажмите Размер импорта кнопку, чтобы указать размер изображений в раскрывающемся списке Размер импортированного изображения диалоговое окно;
• Наконец, нажмите Импортировать кнопку.

3. Затем в появившемся диалоговом окне выберите ячейку, в которую вы хотите вставить изображения, см. Снимок экрана:

4. Нажмите OK, изображения были вставлены в определенные ячейки, которые соответствуют значениям ячеек.

Бесплатная загрузка Kutools for Excel от Yhao сейчас!

---

Больше относительных статей:

Необходимо сделать так, чтобы в одной из ячеек листа был выпадающий список с наименованиями, при выборе из которого товар отображался бы рядом в виде фотографию.

Шаг 1. Создаем каталог с фото и даем ему имя

Создаем на Листе 1 каталог с наименованиями и фотографиями товаров, состоящий из двух столбцов (Модель и Фото):

Теперь надо дать имя нашему каталогу, чтобы ссылаться на него в будущем. Для этого используем кнопку Диспетчер имен (Name Manager) на вкладке Формулы (Formulas). Создаем новый диапазон, вводим имя (например, Фотоальбом) и в качестве адреса указываем формулу:
=СМЕЩ(Лист1!$A$1;1;0;СЧЁТЗ(Лист1!$A:$A)-1;1)
=OFFSET(Лист1!$A$1;1;0;COUNTA(Лист1!$A:$A)-1;1)

Эта формула определяет последнюю занятую ячейку в столбце А и выдает на выходе диапазон с А2 до этой найденной ячейки. Такая относительно сложная конструкция нужна, чтобы впоследствии дописывать новые модели к нашему списку и не думать об исправлении диапазона. Если дописывать точно ничего не придется, то можете вместо ввода этой страшноватой формулы просто указать =A2:A5.

Шаг 2. Выпадающий список для выбора модели

Перейдем на Лист 2 и создадим там ячейку с выпадающим списком для выбора пользователем модели телефона (пусть это будет A1). Выделяем ячейку и идем на вкладку Данные – Проверка данных (Data – Data Validation). Далее в поле Тип данных (Allow) выбираем Список (List), а в качестве Источника (Source) указываем наш Фотоальбом (не забудьте перед ним добавить знак равенства).

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

Шаг 3. Копируем фотографию

Перенесем первую фотографию из фотоальбома к выпадающему списку. Надо выделить ячейку с первой фотографией (не сам рисунок, а ячейку!) и развернуть выпадающий список под кнопкой Копировать (Copy) на Главной (Home) вкладке:

Microsoft Excel 2007 больше ничего не спросит, а в Excel 2010-2016 появится еще одно дополнительное окно с выбором типа создаваемого изображения:

В нем нужно выбрать варианты «как на экране» и «растровый». Копируем, переходим на Лист 2 к выпадающему списку и в любую пустую ячейку недалеко от него вставляем наш мини-скриншот ячейки с фотографией (на вкладке Главная – Правка – Вставить или обычное CTRL+V).

Шаг 4. Создаем динамическую ссылку на выбранную фотографию

Теперь необходимо сделать ссылку, которая будет указывать на ячейку с выбранной фотографией. Снова открываем Диспетчер имен (Name Manager) на вкладке Формулы (Formulas) и создаем еще один именованный диапазон:

В английском варианте: =OFFSET(Лист1!$B$2;MATCH(Выбор;Фотоальбом;0)-1;0;1;1).

Технически функция ПОИСКПОЗ (MATCH) находит ячейку с нужной моделью в каталоге по названию, а функция СМЕЩ (OFFSET) затем выдает ссылку на соседнюю справа от найденного названия ячейку, т.е. ячейку с фотографией товара.

Шаг 5. Привязываем фотографию к ссылке

Осталось выделить скопированную фотографию на Листе 2 и вписать в строку формул =Фото и нажать Enter.

Под выпадающим списком понимается содержание в одной ячейке нескольких значений. Когда пользователь щелкает по стрелочке справа, появляется определенный перечень. Можно выбрать конкретное.

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

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

Путь: меню «Данные» — инструмент «Проверка данных» — вкладка «Параметры». Тип данных – «Список».

Ввести значения, из которых будет складываться выпадающий список, можно разными способами:

1. Вручную через «точку-с-запятой» в поле «Источник».



2. Ввести значения заранее. А в качестве источника указать диапазон ячеек со списком.



3. Назначить имя для диапазона значений и в поле источник вписать это имя.

Любой из вариантов даст такой результат.



Выпадающий список в Excel с подстановкой данных

Необходимо сделать раскрывающийся список со значениями из динамического диапазона. Если вносятся изменения в имеющийся диапазон (добавляются или удаляются данные), они автоматически отражаются в раскрывающемся списке.

1. Выделяем диапазон для выпадающего списка. В главном меню находим инструмент «Форматировать как таблицу».



2. Откроются стили. Выбираем любой. Для решения нашей задачи дизайн не имеет значения. Наличие заголовка (шапки) важно. В нашем примере это ячейка А1 со словом «Деревья». То есть нужно выбрать стиль таблицы со строкой заголовка. Получаем следующий вид диапазона:



3. Ставим курсор в ячейку, где будет находиться выпадающий список. Открываем параметры инструмента «Проверка данных» (выше описан путь). В поле «Источник» прописываем такую функцию:

Протестируем. Вот наша таблица со списком на одном листе:

Добавим в таблицу новое значение «елка».

Теперь удалим значение «береза».

Осуществить задуманное нам помогла «умная таблица», которая легка «расширяется», меняется.

Теперь сделаем так, чтобы можно было вводить новые значения прямо в ячейку с этим списком. И данные автоматически добавлялись в диапазон.

1. Сформируем именованный диапазон. Путь: «Формулы» — «Диспетчер имен» — «Создать». Вводим уникальное название диапазона – ОК.



2. Создаем раскрывающийся список в любой ячейке. Как это сделать, уже известно. Источник – имя диапазона: =деревья.
3. Снимаем галочки на вкладках «Сообщение для ввода», «Сообщение об ошибке». Если этого не сделать, Excel не позволит нам вводить новые значения.



4. Вызываем редактор Visual Basic. Для этого щелкаем правой кнопкой мыши по названию листа и переходим по вкладке «Исходный текст». Либо одновременно нажимаем клавиши Alt + F11. Копируем код (только вставьте свои параметры).

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
 

5. Сохраняем, установив тип файла «с поддержкой макросов».



6. Переходим на лист со списком. Вкладка «Разработчик» — «Код» — «Макросы». Сочетание клавиш для быстрого вызова – Alt + F8. Выбираем нужное имя. Нажимаем «Выполнить».

Когда мы введем в пустую ячейку выпадающего списка новое наименование, появится сообщение: «Добавить введенное имя баобаб в выпадающий список?».

Нажмем «Да» и добавиться еще одна строка со значением «баобаб».

Выпадающий список в Excel с данными с другого листа/файла

Когда значения для выпадающего списка расположены на другом листе или в другой книге, стандартный способ не работает. Решить задачу можно с помощью функции ДВССЫЛ: она сформирует правильную ссылку на внешний источник информации.

1. Делаем активной ячейку, куда хотим поместить раскрывающийся список.
2. Открываем параметры проверки данных. В поле «Источник» вводим формулу: =ДВССЫЛ(“[Список1.xlsx]Лист1!$A$1:$A$9”).

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

Как сделать зависимые выпадающие списки

Возьмем три именованных диапазона:

Это обязательное условие. Выше описано, как сделать обычный список именованным диапазоном (с помощью «Диспетчера имен»). Помним, что имя не может содержать пробелов и знаков препинания.

1. Создадим первый выпадающий список, куда войдут названия диапазонов.



2. Когда поставили курсор в поле «Источник», переходим на лист и выделяем попеременно нужные ячейки.



3. Теперь создадим второй раскрывающийся список. В нем должны отражаться те слова, которые соответствуют выбранному в первом списке названию. Если «Деревья», то «граб», «дуб» и т.д. Вводим в поле «Источник» функцию вида =ДВССЫЛ(E3). E3 – ячейка с именем первого диапазона.



Выбор нескольких значений из выпадающего списка Excel

Бывает, когда из раскрывающегося списка необходимо выбрать сразу несколько элементов. Рассмотрим пути реализации задачи.

1. Создаем стандартный список с помощью инструмента «Проверка данных». Добавляем в исходный код листа готовый макрос. Как это делать, описано выше. С его помощью справа от выпадающего списка будут добавляться выбранные значения.

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
 

2. Чтобы выбранные значения показывались снизу, вставляем другой код обработчика.

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
 

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


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


Не забываем менять диапазоны на «свои». Списки создаем классическим способом. А всю остальную работу будут делать макросы.

Выпадающий список с поиском

1. На вкладке «Разработчик» находим инструмент «Вставить» – «ActiveX». Здесь нам нужна кнопка «Поле со списком» (ориентируемся на всплывающие подсказки).



2. Щелкаем по значку – становится активным «Режим конструктора». Рисуем курсором (он становится «крестиком») небольшой прямоугольник – место будущего списка.



3. Жмем «Свойства» – открывается перечень настроек.



4. Вписываем диапазон в строку ListFillRange (руками). Ячейку, куда будет выводиться выбранное значение – в строку LinkedCell. Для изменения шрифта и размера – Font.

Скачать пример выпадающего списка

При вводе первых букв с клавиатуры высвечиваются подходящие элементы. И это далеко не все приятные моменты данного инструмента. Здесь можно настраивать визуальное представление информации, указывать в качестве источника сразу два столбца.