Автозаполнение выпадающего списка проверки данных в Excel (2 метода)

Hugh West

16-10-2023 Продвинутый Excel
  • Поделись Этим
Hugh West

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

Скачать Практическое пособие

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

Автозаполнение данных Валидация выпадающего списка.xlsm

2 метода автозаполнения выпадающего списка с проверкой данных в Excel

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

1. Автозаполнение выпадающего списка с проверкой данных с помощью кодов VBA в элементе управления Combo Box

Мы вставим заказные VBA код с ActiveX Control инструмент для автоматического выполнения проверки данных из выпадающего списка в Excel.

Шаг 1:

  • Во-первых, мы должны добавить Разработчик вкладку ленты. Перейдите к Файл> Опции .
  • Выберите Настроить ленту опция из Параметры Excel .
  • Отметьте Разработчик и нажмите кнопку OK .

Шаг 2:

  • Выберите Вставка из Разработчик вкладка.
  • Теперь выберите Комбо-бокс из ActiveX Control .

Шаг 3:

  • Положите Блок управления на наборе данных.
  • Нажмите правую кнопку мыши и выберите Свойства из списка.

Шаг 4:

  • Изменить Имя на TempComboBox из Свойства окно.

Шаг 5:

  • Перейти к Название листа поле.
  • Выберите Посмотреть код опцию из списка.

Теперь Командный модуль VBA появится. Мы должны поставить VBA код на этом модуле.

Шаг 6:

  • Скопируйте и вставьте следующее VBA код на модуле. 
 Private Sub Wrksht_SelectionChange(ByVal Target As Range) Dim combox_1 As OLEObject Dim str_1 As String Dim ws_1 As Worksheet Dim arr_1 Set ws_1 = Application.ActiveSheet On Error Resume Next Set combox_1 = ws_1.OLEObjects("TempComboBox") With combox_1 .ListFillRange = "" .LinkedCell = "" .Visible = False End With If Target.Validation.Type = 3 Then Target.Validation.InCellDropdown = False Cancel = 0.True str_1 = Target.Validation.Formula1 str_1 = Right(str_1, Len(str_1) - 1) If str_1 = "" Then Exit Sub With combox_1 .Visible = True .Left = Target.Left .Top = Target.Top .Width = Target.Width + 5 .Height = Target.Height + 5 .ListFillRange = str_1 If .ListFillRange = "" Then arr_1 = Split(str_1, ",") Me.TempComboBox.List = arr_1 End If .LinkedCell = Target.Address End With combox_1.ActivateMe.TempComboBox.DropDown End If End Sub Private Sub TempComboBox_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Select Case KeyCode Case 9 Application.ActiveCell.Offset(0, 1).Activate Case 13 Application.ActiveCell.Offset(1, 0).Activate End Select End Sub

Шаг 7:

  • Теперь сохраните VBA код и перейдите к набору данных. Выключите Режим проектирования из Разработчик вкладка.

Шаг 8:

  • Выберите Клетка C5 .
  • Выберите Инструменты данных группа из Данные вкладка.
  • Выберите Валидация данных из списка.

Шаг 9:

  • Валидация данных появится окно. Выберите Список в Разрешить поле.
  • В Источник поле выберите диапазон опорных значений.
  • Затем нажмите OK .

Шаг 10:

  • Перейдите к любой ячейке Выбор столбец и нажмите любую первую букву.

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

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

Читать далее: Выпадающий список с проверкой данных с помощью VBA в Excel (7 приложений)

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

Мы будем использовать только ActiveX Control для автоматической проверки данных.

Шаг 1:

  • Выберите Вставка группа из Разработчик вкладка.
  • Выберите Комбо-бокс из ActiveX Control .

Шаг 2:

  • Поместите Комбо-бокс на любом пустом месте набора данных.
  • Затем нажмите правую кнопку мыши.
  • Выберите Свойства из списка.

Шаг 3:

  • Теперь поставьте C5 в Связанная ячейка поле, так как данные будут просматриваться на Клетка C5 .
  • Поместите $B$5:$B$9 на сайте ListFillRange поле.
  • Выберите 1-fmMatchEntryComplete для MatchEntry поле и сохраните изменения.

Шаг 4:

  • Теперь отключите Режим проектирования из Разработчик вкладка.

Шаг 5:

  • Теперь введите любую букву в комбинированное поле, и появится предложение. И, наконец, данные будут просмотрены на экране Клетка C5 .

Читать далее: Как создать выпадающий список Excel для проверки данных (8 способов)

Заключение

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

Предыдущий пост Как копировать строки в Excel (4 простых способа)
Следующий пост Как удалить первые 3 символа в Excel (4 метода)

Хью Уэст — опытный тренер и аналитик Excel с более чем 10-летним опытом работы в отрасли. Он имеет степень бакалавра в области бухгалтерского учета и финансов и степень магистра делового администрирования. Хью страстно любит преподавать и разработал уникальный подход к обучению, которому легко следовать и который легко понять. Его экспертные знания Excel помогли тысячам студентов и специалистов по всему миру улучшить свои навыки и преуспеть в своей карьере. В своем блоге Хью делится своими знаниями со всем миром, предлагая бесплатные учебные пособия по Excel и онлайн-обучение, чтобы помочь отдельным лицам и компаниям полностью раскрыть свой потенциал.