Excel убрать раскрывающийся список в excel 2010

Содержание

• Способ 1: Кнопка «Удалить» в контекстном меню
• Способ 2: Кнопка «Очистить все» в меню управления списками
• Способ 3: Изменение типа данных ячейки
• Вопросы и ответы

Способ 1: Кнопка «Удалить» в контекстном меню

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

1. Сначала отыщите в таблице выпадающий список, выделите его, а затем сделайте щелчок правой кнопкой мыши.



2. В контекстном меню найдите пункт «Удалить» и активируйте его.



3. Появится стандартное окно удаления ячеек, где укажите один из первых вариантов, отметив его маркером.



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

Если вдруг оказалось, что был удален не тот список или это действие необходимо отменить по другим причинам, сразу же нажмите стандартное сочетание клавиш Ctrl + Z и список снова появится в той же ячейке в своем предыдущем состоянии.

Способ 2: Кнопка «Очистить все» в меню управления списками

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

1. Выделите выпадающий список и откройте вкладку «Данные».



2. Нажмите по кнопке «Проверка данных» для открытия выпадающего меню.



3. В нем повторно кликните по пункту с таким же названием.



4. Меньше чем через секунду появится необходимое окно, где внизу слева щелкните по уже упомянутой кнопке «Очистить все».



5. Ячейка станет стандартного формата, в чем вы можете убедиться, вернувшись в таблицу. Там останется только одно из наименований старого списка, очистить которое уже не составит труда.

Способ 3: Изменение типа данных ячейки

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

1. Нажмите по кнопке «Проверка данных» для перехода в то же меню.



2. Разверните выпадающий список «Тип данных», чтобы задать другое значение.



3. Определите «Любое значение» для возвращения ячейки в исходное состояние.





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

Еще статьи по данной теме:

Помогла ли Вам статья?

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

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

Вариант 1: Контекстное меню ячейки

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

1. Выделите ячейку с раскрывающимся списком и кликните по ней правой кнопкой мыши.

2. Из контекстного меню выберите пункт «Удалить».

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

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

Вариант 2: Меню «Проверка вводимых значений»

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

1. Выделите список левой кнопкой мыши, перейдите на вкладку «Данные» и откройте окно «Проверка данных».

2. Слева внизу вы увидите кнопку «Очистить все», которая и удаляет все выставленные условия проверки, то есть в данном случае – выпадающий список.

3. Теперь вы увидите, что тип данных изменился на «Любое значение» и пропала строка со значениями списка.

4. Вернитесь к таблице и проверьте результативность выполненных действий.

Вариант 3: Изменение типа данных в ячейке

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

1. Выделите ячейку и перейдите в «Проверка данных» точно так же, как это было показано выше.

2. На этот раз разверните меню «Тип данных» и установите параметр «Любое значение» или другой, в зависимости от ваших личных предпочтений.

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

Все действия в Microsoft Excel, как и в практически любой другой программе, можно отменить, используя комбинацию клавиш Ctrl + Z. Нажмите ее один раз, если после удаления списка вы решили, что хотите его вернуть, или забыли сохранить конкретные значения.

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

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

​Смотрите также​ = True End​

​ введенное имя баобаб​ со строкой заголовка.​

1. ​ то два варианта.​ там, это сделала​

   ​ вводимых данных. Находясь​.​ любой ячейки. В​ имеющимся списочным элементам​​ ввести в ячейку​​после символа​

2. ​ использовать перечень, если​​«Список»​​ из имеющихся данных,​​ как создать диапазон​​, а затем —​

3. ​Ненужный раскрывающийся список на​​ If End Sub​​ в выпадающий список?».​​ Получаем следующий вид​​1. В поле​

4. ​ сотрудница, которая работала​​ в любом разделе​​Также вместо этого действия​

​ раскрывшемся списке видим,​ было добавлено нужное​ любое значение, которое​«=»​ его преобразовать в​. После этого перемещаемся​ читайте в статье​​ и присвоить ему​​Всех​ листе можно удалить.​​Чтобы выбранные значения показывались​​Нажмем «Да» и добавиться​ диапазона:​​ «Источник» данные разделены​​ здесь до меня​​ указанного инструмента, нам​​ можно кликнуть по​​ что удаленный элемент​​ нам значение. Теперь​​ отсутствует в перечне,​​следует указать наименование​ «умную» таблицу. В​

​ к полю​ «Создание списка в​ имя, смотрите в​или​Windows macOS Online​ снизу, вставляем другой​

1. ​ еще одна строка​Ставим курсор в ячейку,​

   ​ точкой с запятой.​ не знаю зачем​ нужно совершить единственное​ обозначенному фрагменту правой​​ отсутствует.​​ при желании его​

2. ​ то данное действие​​ оператора –​​ такой таблице будет​​«Источник»​​ Excel без повторов».​

3. ​ статье «Диапазон в​​Этих же​​ ​​ код обработчика.Private Sub​​ со значением «баобаб».​

4. ​ где будет находиться​​ Просто добавляете новое​​ она это сделала.​

​ действие — нажать​ кнопкой мышки и​Что же делать, если​ можно выбрать, чтобы​ заблокируется. При этом,​«ДВССЫЛ»​ легче менять значения,​​. Тут нужно указать​​Как удалить выпадающий список​ Excel» здесь.​​. Далее повторите действия,​​Выделите ячейку, в которой​ Worksheet_Change(ByVal Target As​​Когда значения для выпадающего​​ выпадающий список. Открываем​​ значение в список.​​ А через проверку​​ на кнопку​​ остановиться на варианте​​ значения добавлялись в​​ вставить в элемент​ если вы вносили​

​. После этого в​ тем самым автоматически​ группу наименований, предназначенную​ Excel.​Список можно написать​ описанные выше.​

1. ​ есть раскрывающийся список.​ Range) On Error​

2. ​ списка расположены на​​ параметры инструмента «Проверка​​2. В поле​​ данных не получается,​​«Очистить всё»​

3. ​«Копировать»​​ окно проверки данных​​ таблицы.​​ сообщение предупреждения в​​ скобках в качестве​

4. ​ изменяя списочные элементы.​​ для использования в​​Нужно выделить ячейки​

​ и в столбце​Если вместо удаления раскрывающегося​Если вы хотите удалить​ Resume Next If​ другом листе или​ данных» (выше описан​

support.office.com

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

​ «Источник» указан диапазон​ там только три​​. Она располагается в​.​ вручную, а не​​Но что делать, если​​ окно проверки данных,​ аргумента данной функции​ Таким образом, данный​ списке. Эти названия​ с выпадающими списками.​​ этой же таблице.​ списка вы решили​​ несколько таких ячеек,​ Not Intersect(Target, Range(«Н2:К2»))​ в другой книге,​
​ путь). В поле​ ячеек, в котором​ пункта: «Проверка данных»,​ нижнем левом углу​Ещё проще сразу после​ при помощи дополнительной​ перечень значений подтягивается​ то оно отобразиться​ должен быть указан​ диапазон фактически превратится​ можно внести вручную,​ И, выбрав функцию​
​ Но, затем, столбец​ изменить параметры в​ выделите их, удерживая​ Is Nothing And​ стандартный способ не​ «Источник» прописываем такую​ находится список. Находите​
​ «Обвести невернуе данные»,​ окна.​ выделения применить набор​ таблицы?​ не из отдельной​ на экране. Нужно​ адрес диапазона, включая​ в таблицу подстановок.​ а можно указать​ «Проверка данных», выбрать​ скрыть, список работать​
​ нем, читайте статью​ нажатой клавишу​
​ Target.Cells.Count = 1​ работает. Решить задачу​ функцию:​ диапазон со списком​ У»Удалить обводку неверных​После этого окно проверки​ кнопок​Выделяем табличный диапазон с​ таблицы, а был​ в окне предупреждения​ наименование книги и​Для того, чтобы преобразовать​ на них ссылку,​ — «Любое значение».​
​ будет. Как скрыть​ Добавление и удаление​CTRL​ Then Application.EnableEvents =​ можно с помощью​Протестируем. Вот наша таблица​ и добавляете значения,​ данных» и больше​ данных можно закрывать,​
​Ctrl+C​ раскрывающимся перечнем и​ внесен вручную? Для​ нажать на кнопку​ листа. Собственно, как​ диапазон в «умную»​ если они уже​Выпадающий список ставим​ столбец, смотрите в​ элементов раскрывающегося списка.​.​ False If Len(Target.Offset(1,​ функции ДВССЫЛ: она​ со списком на​ а также корректируете​ ничего. или я​ нажав на стандартную​.​ переходим в окошко​ добавления элемента в​«Отмена»​ показано на изображении​ таблицу, выделяем его​ размещены в документе​

​ в ячейку, чтобы​ статье «Как скрыть​Выделите ячейки, в которых​Щелкните​ 0)) = 0​ сформирует правильную ссылку​ одном листе:​
​ адрес диапазона в​​ где то не​ кнопку закрытия в​​После этого выделяем тот​ проверки значений, как​ этом случае тоже​​и со следующей​ ниже.​ и передвигаемся во​ Excel в другом​ пользователи правильно заполняли​ столбцы в Excel».​ есть раскрывающиеся списки.​Данные​

​ Then Target.Offset(1, 0)​ на внешний источник​Добавим в таблицу новое​ поле «Источник»​ там смотрюж?​ его верхнем правом​ фрагмент табличного массива,​ это мы уже​ есть свой алгоритм​ попытки ввести корректные​
​На этом мы бы​ вкладку​ месте.​

​ бланк, таблицу. Но​Всё. У нас​Щелкните​>​ = Target Else​ информации.​ значение «елка».​PS. в Excel​Серый_Кот​​ углу в виде​ где располагаются выпадающие​ делали ранее. В​ действий.​ данные.​ могли и закончить​​«Главная»​Если выбран ввод вручную,​ есть еще несколько​ есть список, мы​Данные​Проверка данных​ Target.End(xlDown).Offset(1, 0) =​
​Делаем активной ячейку, куда​Теперь удалим значение «береза».​
​ 2007 и 2010​: если честно не​ крестика или на​ элементы. Жмем на​ указанном окне перемещаемся​
​Выделяем весь табличный диапазон,​Таким способом при необходимости​ процедуру, нажав на​. Там клацаем по​ то каждый списочный​ других способов проверить​ присвоили имя этому​>​.​ Target End If​
​ хотим поместить раскрывающийся​Осуществить задуманное нам помогла​ «Проверка данных» размещена​ отвечу на вопрос​ кнопку​ кнопку​

excel-office.ru

Работа с ниспадающими списками в Microsoft Excel

​ в раздел​ в элементах которого​ заполняем всю таблицу.​ кнопку​ кнопке​ элемент требуется вписать​ правильность вводимых данных.​ диапазону. Теперь устанавливаем​Проверка данных​На вкладке​ Target.ClearContents Application.EnableEvents =​ список.​ «умная таблица», которая​ на вкладке Данные​ какого типа список,​«OK»​«Вставить»​

​«Параметры»​ размещен выпадающий перечень.​

Использование выпадающих списков

​Но что делать, если​«OK»​«Форматировать как таблицу»​ в область через​ Об этом читайте​ этот список в​.​Параметры​ True End If​Открываем параметры проверки данных.​ легка «расширяется», меняется.​ в группе Работа​ я не очень​в нижней части​, локализированную на ленте​

Процедура создания

​. В области​ Переходим во вкладку​ требуется все-таки добавить​в окошке проверки​, которая размещена на​ точку с запятой​​ статью «Проверка данных​​ ячейку. Ставим курсор​

1. ​На вкладке​нажмите кнопку​ End Sub​ В поле «Источник»​Теперь сделаем так, чтобы​​ с данными​​ хорошо разбираюсь в​ окна.​​ во вкладке​​«Источник»​«Данные»​​ новый элемент? Действия​​ данных, но при​

   

2. ​ ленте в блоке​​ (​​ в Excel».​​ в ячейку, в​​Параметры​​Очистить все​​Чтобы выбираемые значения отображались​ вводим формулу: =ДВССЫЛ(“[Список1.xlsx]Лист1!$A$1:$A$9”).​​ можно было вводить​​Андрей чуйко​ определениях, совсем недавно​​Затем выделяем любую из​​«Главная»​выделяем курсором то​и снова кликаем​ тут зависят от​ желании можно усовершенствовать​«Стили»​;​В Excel можно​ которой будем делать​нажмите кнопку​.​

   ​ в одной ячейке,​Имя файла, из которого​ новые значения прямо​: Не обращая внимания​ начал пользоваться Excel.​ ячеек, в которой​​в разделе​​ значение, которое требуется​

   

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

   

   ​ список заполнялся автоматически.​ на закладку «Данные»​.​ОК​ препинания, применим такой​ списка, заключено в​ этим списком. И​ — ввести слово.​ выпадающий список удаляется​ раскрывающийся перечень. Как​.​ на кнопку​в группе​ в окне проверки​«Сообщения для ввода»​ таблицы выбор конкретного​ данные из уже​ Смотрите в статье​ в раздел «Работа​Нажмите кнопку​.​ модуль.​ квадратные скобки. Этот​ данные автоматически добавлялись​ Все другие функции​ без проблем, а​ видим, теперь нет​Второй вариант действий –​Delete​

   

   ​«Работа с данными»​ данных: введен вручную​​окошка проверки данных.​​ стиля никак не​​ существующего табличного массива,​​ «Заполнить автоматически список​ с данными», нажимаем​ОК​Если вам нужно удалить​Private Sub Worksheet_Change(ByVal​ файл должен быть​ в диапазон.​ для ячейки можно​ в основном (рабочем,​ ни подсказки при​

   

   ​ это щелкнуть по​на клавиатуре.​.​ или подтягивается из​ Тут в области​ влияет, а поэтому​ то следует перейти​ в Excel».​ на кнопку «Проверка​.​ все проверки данных​

   ​ Target As Range)​ открыт. Если книга​Сформируем именованный диапазон. Путь:​ удалить в строке​ в общей папке)​​ выделении элемента, ни​​ выделению правой кнопкой​После того, как элемент​​Запускается окно проверки вводимых​​ табличного массива.​«Сообщение»​​ выбираем любой из​​ на лист, где​Создание ниспадающих списков позволяет​ данных», выбираем «Проверка​Если вместо удаления раскрывающегося​ с листа, включая​On Error Resume​ с нужными значениями​

   

   ​ «Формулы» — «Диспетчер​ формул, если они​ кнопка «Проверка данных»​ треугольника для вызова​ мышки и остановить​ удален, щелкаем по​ данных. Перемещаемся в​Если данные для формирования​можно написать текст,​ них.​ тот расположен (если​​ не только экономить​​ данных». В появившемся​ списка вы решили​ раскрывающиеся списки, но​ Next​ находится в другой​ имен» — «Создать».​ там отражены.​ выделена серым и​​ списка справа от​​ выбор на варианте​

   

   ​«OK»​ раздел​ списка подтягиваются из​ который будут видеть​После этого открывается небольшое​ он размещен на​ время при выборе​ диалоговом окне в​ изменить параметры в​ вы не знаете,​​If Not Intersect(Target,​​ папке, нужно указывать​ Вводим уникальное название​Под выпадающим списком понимается​ не нажимается.​ ячейки. Но при​«Вставить»​. Теперь его не​«Параметры»​ табличного массива, то​

   

   ​ юзеры, наводя курсор​ окошко, в котором​ другом), поставить курсор​ варианта в процессе​ строке «тип данных»​​ нем, см. статью​​ где они находятся,​ Range(«C2:C5»)) Is Nothing​ путь полностью.​ диапазона – ОК.​ содержание в одной​Alex_ST​ этом нетронутым осталось​в группе​ будет и в​. Как видим, все​ переходим к нему.​ на элемент листа​​ содержится адрес выделенного​​ в область​​ заполнения таблиц, но​​ — выбираем «Список».​ Добавление и удаление​​ воспользуйтесь диалоговым окном​​ And Target.Cells.Count =​Возьмем три именованных диапазона:​Создаем раскрывающийся список в​ ячейке нескольких значений.​: Книга, наверное, открыта​ форматирование и все​«Параметры вставки»​ выпадающем перечне, точно​ настройки тут точно​

   

3. ​ Выделяем ячейку диапазона.​ с ниспадающим списком.​ массива. Если выделение​«Источник»​​ и оградить себя​​ В строке «Источник»​ элементов раскрывающегося списка.​Выделить группу ячеек​ 1 Then​Это обязательное условие. Выше​​ любой ячейке. Как​​ Когда пользователь щелкает​ в режиме общего​​ до этого введенные​​.​ так же, как​ такие же, как​ Если это не​ Записываем то сообщение,​ было выполнено верно,​окна проверки данных,​

   

4. ​ от ошибочного внесения​​ — указываем название​​Сделать выпадающий список в​​. Для этого нажмите​​Application.EnableEvents = False​ описано, как сделать​ это сделать, уже​ по стрелочке справа,​ доступа? (просто посмотрите​ значения с помощью​Наконец, есть возможность просто​ это мы видели​​ мы их выставили​​ «умная» таблица, а​ которое считаем нужным.​ то тут ничего​ а затем выделить​ некорректных данных. Это​​ нашего диапазона, но​​ Excel​

​ клавиши​newVal = Target​

Выполнение операций

​ обычный список именованным​ известно. Источник –​ появляется определенный перечень.​ в заголовке окна​

1. ​ списка. Это означает,​ обозначить нужные ячейки​ и в предыдущем​ ранее. Нас в​ простой диапазон данных,​Далее перемещаемся в раздел​ изменять не нужно.​ массив ячеек, где​ очень удобный и​ перед названием ставим​просто. Можно сделать​CTRL+G​Application.Undo​ диапазоном (с помощью​ имя диапазона: =деревья.​ Можно выбрать конкретное.​

   

2. ​ правее имени файла​ что с поставленной​ и набрать сочетание​ варианте действий с​ данном случае будет​ то нужно вставить​«Сообщение об ошибке»​ Так как у​ находится перечень. Важно,​ практичный инструмент. Давайте​

   

3. ​ знак «равно». Получилось​ связанные выпадающие списки​

   

4. ​, в открывшемся диалоговом​oldval = Target​ «Диспетчера имен»). Помним,​Снимаем галочки на вкладках​Очень удобный инструмент Excel​ написано [Общий]?)​ задачей мы справились​ кнопок​ таблицей.​ интересовать область​ строку в середину​. Тут в области​ нашего диапазона нет​​ чтобы в каждой​​ выясним, как активировать​ так.​ в Excel​

​ окне нажмите кнопку​If Len(oldval) <>​

Добавление нового элемента

​ что имя не​ «Сообщение для ввода»,​ для проверки введенных​В режиме общего​ успешно: инструмент, который​Ctrl+V​В то же время,​«Источник»​ массива. Если же​«Сообщение»​

1. ​ заголовков, то у​ отдельной ячейке располагался​ его в Excel,​Нажимаем «ОК». Все,​.​Выделить​ 0 And oldval​ может содержать пробелов​ «Сообщение об ошибке».​ данных. Повысить комфорт​ доступа управление проверкой​ больше нам не​.​ существуют и ситуации,​. Добавляем туда к​ применяете «умную» таблицу,​можно ввести текст,​ пункта​ отдельный списочный элемент.​ и как им​ список вставлен. Теперь​Когда список во​, выберите пункт​ <> newVal Then​

   

   ​ и знаков препинания.​ Если этого не​ работы с данными​ данных не доступно:​ нужен, удален, но​При любом из вышеуказанных​ когда выпадающий список​ уже имеющему перечню​ то в этом​ который будет наблюдать​«Таблица с заголовками»​ После этого координаты​ пользоваться, а также​ копируем эту ячейку​ втором столбце зависит​​Проверка данных​​Target = Target​

   

2. ​Создадим первый выпадающий список,​ сделать, Excel не​ позволяют возможности выпадающих​​ «серенькое»​​ результаты его работы​ действий вместо ячеек,​​ нужно полностью удалить.​​ через точку с​
3. ​ случае достаточно просто​

   
4. ​ пользователь при попытке​галочки быть не​ указанного диапазона должны​ узнаем некоторые другие​

   

5. ​ перетаскиванием вниз, если​ от значения в​, а затем —​ & «,» &​ куда войдут названия​ позволит нам вводить​ списков: подстановка данных,​Отключите общий доступ​ остались целыми.​ содержащих значения и​ Если вам не​ запятой (​ вписать требуемое значение​ ввести некорректные данные,​ должно. Хотя конкретно​

​ отобразиться в области​ нюансы обращения с​ нужен такой выпадающий​ ячейке первого столбца.​Всех​ newVal​ диапазонов.​ новые значения.​ отображение данных другого​

1. ​ (если у вас​Как видим, ниспадающий список​ ниспадающие списки, будет​ важно, чтобы введенные​​;​​ в первой строке​ то есть, любые​​ в вашем случае,​​«Источник»​​ ним.​​ список по всему​

   

2. ​ Как сделать​или​Else​​Когда поставили курсор в​​Вызываем редактор Visual Basic.​ листа или файла,​ хватает прав на​ может значительно облегчить​ вставлен абсолютно чистый​ данные были сохранены,​) то значение или​​ под ней и​​ данные, отсутствующие в​ возможно, заголовок и​.​Скачать последнюю версию​​ столбцу.​​в Excel зависимые раскрывающиеся​Этих же​Target = newVal​ поле «Источник», переходим​ Для этого щелкаем​​ наличие функции поиска​​ это), потом отключите​

   

3. ​ введение данных в​ фрагмент.​ то произвести удаление​ значения, которые хотим​ данная строка тут​

Удаление элемента

​ ниспадающем списке. В​ будет применяться. Так​Ещё один вариант установки​ Excel​

1. ​Таким способом можно​ списки,​. Далее повторите действия,​End If​ на лист и​ правой кнопкой мыши​ и зависимости.​ проверку данных и​ таблицы, а также​При желании таким же​ очень просто.​​ увидеть в выпадающем​​ же будет включена​

   

2. ​ области​ что нам остается​ связи – это​Ниспадающие, или как принято​сделать несвязанные многоуровневые выпадающие​читайте в статье​​ описанные выше.​​If Len(newVal) =​​ выделяем попеременно нужные​​ по названию листа​

   

3. ​Путь: меню «Данные» -​ верните общий доступ.​

   
4. ​ предотвратить введение некорректных​ образом можно вставить​Выделяем весь массив, где​ списке. После добавления​ в табличный массив.​«Вид»​ просто нажать на​ присвоение массиву с​ говорить, раскрывающиеся списки​

​ списки в Excel​ «Связанные выпадающие списки​Если вместо удаления раскрывающегося​ 0 Then Target.ClearContents​ ячейки.​ и переходим по​

1. ​ инструмент «Проверка данных»​Казанский​ значений. Это позволит​ не пустой диапазон,​ расположен раскрывающийся перечень.​ клацаем по​ Это как раз​можно выбрать значок,​​ кнопку​​ перечнем имени. Выделяем​​ чаще всего применяют​​. Например, у нас​ в Excel».​ списка вы решили​Application.EnableEvents = True​​Теперь создадим второй раскрывающийся​​ вкладке «Исходный текст».​

   

2. ​ — вкладка «Параметры».​: > это сделала​​ сократить количество ошибок​​ а скопированный фрагмент​ Передвигаемся во вкладку​«OK»​ то преимущество «умной»​ которым будет сопровождаться​«OK»​ диапазон, в котором​ в таблицах. С​

Полное удаление

​ такая таблица с​Можно сделать так,​ изменить параметры в​End If​ список. В нем​ Либо одновременно нажимаем​ Тип данных –​ сотрудница, которая работала​ при заполнении таблиц.​

1. ​ с данными. Недостаток​«Главная»​.​​ таблицы, о котором​​ предупреждение. Вводим текст​​.​​ указаны значения данных.​ их помощью можно​​ данными.​​ что в выпадающем​ нем, читайте статью​​End Sub​​ должны отражаться те​

   

2. ​ клавиши Alt +​ «Список».​ здесь до меня​ Если же какое-нибудь​ ниспадающих списков как​. Щелкаем по иконке​Теперь, если мы откроем​ мы упоминали выше.​ сообщения и клацаем​После этого диапазон будет​ Слева от строки​ ограничить круг вносимых​

​В ячейках строки 1​ списке сначала будут​ Добавление и удаление​Не забываем менять диапазоны​ слова, которые соответствуют​ F11. Копируем код​

1. ​Ввести значения, из которых​ не знаю зачем​ значение нужно добавить​ раз состоит в​«Очистить»​​ выпадающий перечень в​​Но предположим, что мы​ по​​ отформатирован, как таблица.​​ формул находится область​ в табличный массив​​ мы сделаем ряд​​ выпадать буквы алфавита,​

   

   ​ элементов раскрывающегося списка.​ на «свои». Списки​ выбранному в первом​ (только вставьте свои​ будет складываться выпадающий​​ она это сделала​​ дополнительно, то всегда​

   

   ​ том, что в​, которая размещается на​ табличном массиве, то​​ имеем дело с​​«OK»​

2. ​ Если его выделить,​ имён. По умолчанию​ значений. Они позволяют​ выпадающих списков. Нажимаем​ нажав на выбанную​​Выделите ячейку, в которой​​ создаем классическим способом.​ списке названию. Если​​ параметры).Private Sub Worksheet_Change(ByVal​​ список, можно разными​​> совсем недавно​​ можно провести процедуру​

   

   ​ них нельзя вручную​ ленте в блоке​ увидим там добавленное​ более сложным случаем,​.​​ то можно заметить​​ в нём при​​ выбирать для внесения​​ на ячейку А1​

   

   ​ букву выйдет список​ есть раскрывающийся список.​ А всю остальную​ «Деревья», то «граб»,​​ Target As Range)​​ способами:​

3. ​ начал пользоваться Excel​ редактирования. Вариант редактирования​ вписать данные, отсутствующие​«Редактирование»​ значение.​ используя обычный диапазон.​

​Урок: Как сделать выпадающий​ в области имён,​ выделении диапазона отображается​ значения только из​ и, через функцию​ слов, фамилий на​Если вы хотите удалить​ работу будут делать​ «дуб» и т.д.​ Dim lReply As​Вручную через «точку-с-запятой» в​Наверно, сотрудница сделала​ будет зависеть от​ в перечне, но​. В открывшемся меню​Удаление списочного элемента проводится​ Итак, выделяем ячейку​ список в Экселе​ что наименование ему​

​ координаты первой выделенной​ заранее подготовленного перечня.​ «Проверка данных» устанавливаем​ эту букву. Об​ несколько таких ячеек,​ макросы.​ Вводим в поле​ Long If Target.Cells.Count​ поле «Источник».​ это для удобства​ способа создания. После​

1. ​ их можно скопировать​ выбираем позицию​ по точно такому​ в середине указанного​​Теперь давайте разберемся, как​​ было присвоено автоматически.​ ячейки. Мы же​​ Это одновременно ускоряет​​ выпадающий список. Диалоговое​ этом читайте в​ выделите их, удерживая​​На вкладке «Разработчик» находим​​ «Источник» функцию вида​

   
2. ​ > 1 Then​Ввести значения заранее. А​ работы. А Вы,​ заполнения таблицы можно​ и вставить. При​«Очистить все»​ же алгоритму, что​ массива. То есть,​​ работать с тем​​ Это наименование можно​ для наших целей​ процедуру внесения данных​

   

3. ​ окно заполнили так.​ статье «Связанный выпадающий​ нажатой клавишу​ инструмент «Вставить» –​ =ДВССЫЛ(E3). E3 –​ Exit Sub If​ в качестве источника​ не разобравшись, начали​​ удалить выпадающий список,​​ этом проверка данных​.​

   

4. ​ и добавление.​ над этой ячейкой​ инструментом, который мы​ использовать для вставки​ просто вписываем туда​ и оберегает от​Нажимаем «ОК». Копируем​ список в Excel​CTRL​ «ActiveX». Здесь нам​ ячейка с именем​ Target.Address = «$C$2″​ указать диапазон ячеек​ все ломать :(​ хотя делать это​ не сработает. Более​При выборе данного действия​Если данные подтягиваются из​ и под ней​ выше создали.​ в область​ наименование, которое считаем​

​ ошибки.​ формулу вниз по​ по алфавиту» тут.​.​ нужна кнопка «Поле​ первого диапазона.​ Then If IsEmpty(Target)​ со списком.​Снимите защиту книги,​ и не обязательно.​ того, как мы​ в выделенных элементах​ табличного массива, то​ должны быть ещё​Если мы установим курсор​«Источник»​ более подходящим. Главные​Прежде всего, давайте выясним,​ столбцу, если нужно.​Можно сделать выпадающий​Щелкните​ со списком» (ориентируемся​Бывает, когда из раскрывающегося​ Then Exit Sub​

​Назначить имя для диапазона​

lumpics.ru

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

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

​ тогда переходим к​​ строки массива. Клацаем​ на любой элемент​в окне проверки​ требования к имени​ как создать ниспадающий​

​ Затем, нажимаем на​​ список в Excel​Данные​ на всплывающие подсказки).​ списка необходимо выбрать​ If WorksheetFunction.CountIf(Range(«Деревья»), Target)​ значений и в​Серый_Кот​

​ его оставлять даже​​ выпадающего списка будет​ все значения, очищено​ этой таблице и​ по обозначенному фрагменту​ листа, к которому​ данных по описанному​ состоят в том,​ список. Легче всего​ ячейку В1, устанавливаем​ без дополнительного списка​>​Щелкаем по значку –​ сразу несколько элементов.​ = 0 Then​ поле источник вписать​: по словам её​ после окончания работы​ уничтожена.​ форматирование, а кроме​

​ клацаем правой кнопкой​​ правой кнопкой мыши.​ был применен ниспадающий​ ранее нами алгоритму.​ чтобы оно было​ это сделать при​ выпадающий список по​ с данными. Смотрите​
​Проверка данных​ становится активным «Режим​ Рассмотрим пути реализации​ lReply = MsgBox(«Добавить​ это имя.​ коллег опыт работы​ по заполнению таблицы​Зачастую, требуется все-таки убрать​

​ того, достигнута главная​​ мыши по ячейке,​ В меню выбираем​ список, то увидим​ Но, если вы​ уникальным в пределах​ помощи инструмента под​
​ такому же принципу,​ статью «Как сделать​.​ конструктора». Рисуем курсором​
​ задачи.​ введенное имя «​Любой из вариантов даст​ с Excel у​ данными.​ выпадающий список, но​

planetaexcel.ru

КАк убрать выборку с ячейки в Excel, чтоб написать слово которого в выборке нет?

​Параметры​​ небольшой прямоугольник –​ помощью инструмента «Проверка​ & » в​​
​ после каких-то курсов,​Серый_Кот​ те значения, которые​ удален и теперь​ В контекстном меню​.​ окне проверки данных.​
​ можно заменить, просто​ начиналось с буквы.​.​
​ столбца К.​Когда создаем сложные​нажмите кнопку​
​ место будущего списка.​ данных». Добавляем в​ выпадающий список?», vbYesNo​Необходимо сделать раскрывающийся список​ был не многим​
​: Подскажите пожалуйста, как​ с помощью него​ в ячейки можно​ останавливаем выбор на​Запускается окошко, где следует​ Кроме того, справа​ вписав в область​ Теперь именно по​Выделяем столбец табличного массива,​
​И так делаем​ таблицы, анкеты, листы​Очистить все​Жмем «Свойства» – открывается​ исходный код листа​ + vbQuestion) If​

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

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

​ данному наименованию будет​ в ячейках которого​ все выпадающие списки.​ опроса, другие документы,​.​ перечень настроек.​ готовый макрос. Как​

​ lReply = vbYes​ динамического диапазона. Если​а способ -​ из ячейки?​ форматирование. В этом​ вручную.​«Удалить…»​ вставки. Выбираем вариант​ пиктограмма в виде​Если перечень размещен в​

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

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

​Вписываем диапазон в строку​ это делать, описано​ Then Range(«Деревья»).Cells(Range(«Деревья»).Rows.Count +​ вносятся изменения в​

1. ​ помог, Спасибо Alex!​Z​
2. ​ случае следует произвести​Кроме того, если пользователю​.​«Строку»​
3. ​ треугольника. Именно она​ другой книге, то​ который мы до​ список. Передвигаемся во​

​Диапазон списков можно​ установить выпадающий список.​

​ОК​

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

​ ListFillRange (руками). Ячейку,​ выше. С его​ 1, 1) =​ имеющийся диапазон (добавляются​ все гениальное просто)​: Вот бы знать​ более корректные действия​ не нужно сохранять​

1. ​Открывается окно удаления ячеек​и жмем на​ служит для доступа​ для корректного его​
2. ​ этого выделили.​ вкладку​ сделать динамическим. Смотрите​ Это — когда​.​ куда будет выводиться​ помощью справа от​ Target End If​ или удаляются данные),​Алексей матевосов (alexm)​ еще как вы​ по удалению указанного​ введенные данные, то​
3. ​ практически аналогичное тому,​ кнопку​ к выбору списочных​ отражения требуется применить​Теперь в окне проверки​«Данные»​ в статье «Чтобы​ щелкаем мышкой на​

​Если вам нужно удалить​ выбранное значение –​ выпадающего списка будут​

​ End If End​ они автоматически отражаются​

​: Расскажу на примере​

​ его туда поместили!..​ инструмента заполнения.​ существует ещё один​

​ которое мы видели​«OK»​ элементов. Клацаем по​ функцию​ данных в области​и клацаем по​ размер таблицы Excel​

1. ​ ячейку и появляется​ все проверки данных​ в строку LinkedCell.​ добавляться выбранные значения.Private​ If End Sub​
2. ​ в раскрывающемся списке.​ Excel 2003. В​ Попробуйте через проверку​Выделяем весь фрагмент, в​ вариант удалить ниспадающий​
3. ​ при их добавлении.​.​ данному треугольнику.​ДВССЫЛ​«Источник»​ кнопке​ менялся автоматически». Назовем​
4. ​ список, из которого​ с листа, включая​ Для изменения шрифта​ Sub Worksheet_Change(ByVal Target​Сохраняем, установив тип файла​Выделяем диапазон для выпадающего​ старших версиях должно​ данных… :)​ котором расположены элементы​ перечень.​ Тут снова устанавливаем​Итак, пустая строка добавлена.​После клика по нему​. Указанный оператор предназначен​нужно установить символ​«Проверка данных»​ динамический диапазон ячеек​ выбираем нужный вариант​ раскрывающиеся списки, но​ и размера –​ As Range) On​ «с поддержкой макросов».​ списка. В главном​ быть примерно также.​Казанский​ с раскрывающимся перечнем.​Выделяем диапазон пустых ячеек,​ переключатель в позицию​Вписываем в неё то​ меню из списочных​ для того, чтобы​«=»​. Она локализирована на​
5. ​ списка J1:J6 «Единицы».​ слов. Например, так.​
6. ​ вы не знаете,​ Font.​ Error Resume Next​Переходим на лист со​ меню находим инструмент​Встать на ячейку​: Какого типа выпадающий​ Передвигаемся во вкладку​

​ который равнозначен диапазону​«Строку»​ значение, которое желаем,​ объектов будет открыто.​ формировать «суперабсолютные» ссылки​, а затем сразу​

​ ленте в блоке​ Диалоговое окно «Создание​Здесь, в выпадающем списке​

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

​ где они находятся,​Скачать пример выпадающего списка​ If Not Intersect(Target,​ списком. Вкладка «Разработчик»​ «Форматировать как таблицу».​ с выпадающим списком.​ список? Данные -​«Данные»​ элементов массива с​и клацаем по​ чтобы отобразилось в​

1. ​ В нем расположены​ на элементы листа​ же после него​
2. ​«Работа с данными»​ имени» заполним так.​ перечислены наименования продуктов.​

​ воспользуйтесь диалоговым окном​При вводе первых букв​ Range(«Е2:Е9»)) Is Nothing​ — «Код» -​Откроются стили. Выбираем любой.​ Меню «Данные» -​ Проверка, Поле со​и клацаем по​ раскрывающимся перечнем. Передвигаемся​«OK»​

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

​ ниспадающем списке.​

​ все элементы, которые​ в текстовом виде.​ вписать то имя,​.​Теперь для создания выпадающего​Итак, сначала создаем​Выделить группу ячеек​ с клавиатуры высвечиваются​

1. ​ And Target.Cells.Count =​ «Макросы». Сочетание клавиш​ Для решения нашей​
2. ​ «Проверка». В окне​ списком с панели​ значку​ во вкладку​.​
3. ​После этого возвращаемся к​ были ранее внесены​ Собственно при этом​ которое мы присвоили​Запускается окно инструмента​ списка в ячейке​ список в столбик,​. Для этого нажмите​ подходящие элементы. И​ 1 Then Application.EnableEvents​ для быстрого вызова​ задачи дизайн не​ «Проверка вводимых значений»​
   

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

   ​ Формы, комбобокс с​«Проверка данных»​«Главная»​Строка из табличного массива,​ тому табличному массиву,​

   1. ​ через окно проверки​ процедура будет выполняться​ диапазону. Программа сразу​«Проверка значений»​ А1 напишем вместо​ где-нибудь не в​ клавиши​ это далеко не​ = False If​ – Alt +​ имеет значения. Наличие​ будет указан тип​ панели Элементы управления,​, который, как мы​и там кликаем​ как видим, удалена.​ в котором размещен​ данных. Выбираем тот​ практически точно такая​ идентифицирует связь между​. Переходим в раздел​ диапазона ячеек столбца​ этой таблице. Подписываем​CTRL+G​ все приятные моменты​ Len(Target.Offset(0, 1)) =​
   2. ​ F8. Выбираем нужное​ заголовка (шапки) важно.​ данных «Список».​ Автофильтр, наконец?​ помним, размещен на​ по иконке​Теперь возвращаемся к той​ раскрывающийся перечень. Кликнув​ вариант, который считаем​ же, как и​ наименованием и массивом,​«Параметры»​ J, название этого​ столбик – это​, в открывшемся диалоговом​ данного инструмента. Здесь​ 0 Then Target.Offset(0,​ имя. Нажимаем «Выполнить».​ В нашем примере​
   3. ​Чтобы удалить список​Серый_Кот​ ленте в группе​«Копировать»​ таблице, где находятся​
​ по треугольнику, справа​ нужным.​
​ в ранее описываемых​ и подтянет тот​
​. В области​ диапазона.​ будет будущее имя​ окне нажмите кнопку​
​ можно настраивать визуальное​
​ 1) = Target​
​Когда мы введем в​
​ это ячейка А1​
​ надо нажать кнопку​: если честно я​«Работа с данными»​
​, которая локализируется на​ ячейки с выпадающим​ от любой ячейки​
​Выбранный вариант отобразится в​
​ случаях, только в​
​ перечень, который в​
​«Тип данных»​Как сделать один​
​ диапазона. Так удобно​
​Выделить​
​ представление информации, указывать​


   ​ Else Target.End(xlToRight).Offset(0, 1)​ пустую ячейку выпадающего​ со словом «Деревья».​ «Очистить все»​ и сам не​.​

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

   1. ​ ленте в области​ перечнем. Клацаем по​ массива, мы видим,​ ячейке.​ области​ нем расположен.​
   2. ​из перечня выбираем​ список в Excel​ делать, когда несколько​, выберите пункт​ в качестве источника​ = Target End​
   3. ​ списка новое наименование,​ То есть нужно​
   4. ​Если в список​ знаю, как этот​Открывается уже хорошо знакомое​«Буфер обмена»​ треугольнику справа от​ что к уже​Если же мы попытаемся​«Источник»​

   ​Но намного эффективнее получится​

   ​ вариант​ для раскрывающегося списка​ разных списков. Подробнее,​Проверка данных​ сразу два столбца.​ If Target.ClearContents Application.EnableEvents​ появится сообщение: «Добавить​ выбрать стиль таблицы​ надо добавить значения,​ выпадающий список оказался​

   exceltable.com

​ нам окно проверки​

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

Как сделать выпадающий список в Excel

Как сделать выпадающий список в Excel 2010 или 2016 с помощью одной командой на панели инструментов? На вкладке «Данные» в разделе «Работа с данными» найдите кнопку «Проверка данных». Нажмите на нее и выберите первый пункт.

Откроется окно. Во вкладке «Параметры» в выпадающем разделе «Тип данных» выберите «Список».

Снизу появится строка для указания источников.

Указывать информацию можно по-разному.

Сначала назначим имя. Для этого создайте на любом листе такую таблицу.

Выделите ее и нажмите правую кнопку мыши. Щелкните по команде «Присвоить имя».

Введите имя в строку сверху.

Вызовите окно «Проверка данных» и в поле «Источник» укажите имя, поставив перед ним знак «=».

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

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

Подстановка динамических данных Excel

Если Вы добавите какое-то значение в диапазон данных, которые подставляются в перечень, то в нем изменения не произойдет, пока вручную не будут указаны новые адреса. Чтобы связать диапазон и активный элемент, необходимо оформить первый как таблицу. Создайте вот такой массив.

Выделите его и на вкладке «Главная» выберите любой стиль таблицы.

Обязательно поставьте галочку внизу.

Вы получите такое оформление.

Создайте активный элемент, как было описано выше. В качестве источника введите формулу

=ДВССЫЛ("Таблица1[Города]")

Чтобы узнать имя таблицы, перейдите на вкладку «Конструктор» и посмотрите его. Можете поменять имя на любое другое.

Функция ДВССЫЛ создает ссылку на ячейку или диапазон. Теперь ваш элемент в ячейке привязан к массиву данных.

Попробуем увеличить количество городов.

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

 =Адрес_ячейки

Например, если перечень данных находится в ячейке D1, то в ячейке, куда будут выведены выбранные результаты введите формулу

 =D1

Как убрать (удалить) выпадающий список в Excel

Откройте окно настройки выпадающего списка и выберите «Любое значение» в разделе «Тип данных».

Ненужный элемент исчезнет.

Зависимые элементы

Иногда в Excel встречается необходимость создания нескольких перечней, когда один зависит от другого. Например, каждый город имеет несколько адресов. При выборе в первом мы должны получить только адреса выбранного населенного пункта.

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

Это будет название города.

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

Поэтому переименуем эти города, поставив нижнее подчеркивание.

Первый элемент в ячейке A9 создаем обычным образом.

А во втором пропишем формулу:

=ДВССЫЛ(A9)

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

Как настроить зависимые выпадающие списки в Excel с поиском

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

Для второго перечня нужно ввести формулу:

 =СМЕЩ($A$1;ПОИСКПОЗ($E$6;$A:$A;0)-1;1;СЧЁТЕСЛИ($A:$A;$E$6);1)

Функция СМЕЩ возвращает ссылку на диапазон, который смещен относительно первой ячейки на определенное число строк и столбцов:=СМЕЩ(начало; вниз; вправо; размер_в_строках; размер_в_столбцах)

ПОИСКПОЗ возвращает номер ячейки с выбранным в первом списке (E6) городом в указанной области SA:$A.
СЧЕТЕСЛИ считает количество совпадений в диапазоне со значением в указанной ячейке (E6).

Мы получили связанные выпадающие списки в Excel с условием на совпадение и поиском диапазона для него.

Мультивыбор

Часто нам необходимо получить несколько значений из набора данных. Можно вывести их в разные ячейки, а можно объединить в одну. В любом случае необходим макрос.
Нажмите на ярлыке листа внизу правую кнопку мыши и выберите команду «Просмотреть код».

Откроется окно разработчика. В него надо вставить следующий алгоритм.

 Private Sub Worksheet_Change(ByVal Target As Range)
 On Error Resume Next
 If Not Intersect(Target, Range("C2:F2")) 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

Обратите внимание, что в строке

 If Not Intersect(Target, Range("E7")) Is Nothing And Target.Cells.Count = 1 Then

Следует проставить адрес ячейки со списком. У нас это будет E7.

Вернитесь на лист Excel и создайте в ячейке E7 список.

При выборе значения будут появляться под ним.

Следующий код позволит накапливать значения в ячейке.

 Private Sub Worksheet_Change(ByVal Target As Range)
 On Error Resume Next
 If Not Intersect(Target, Range("E7")) 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

Как только Вы переведете указатель на другую ячейку, Вы увидите перечень выбранных городов. Для создания объединенных ячеек в Excel прочитайте эту статью.

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

Отличного Вам дня!