Автоматично попълване на падащ списък с валидиране на данни в Excel (2 метода)

  • Споделя Това
Hugh West

Проверката на данните е интересна функция на Excel. Тази функция предлага контрол на потребителя за въвеждане на стойности в клетка. Потребителите не могат да въвеждат каквото искат. Те трябва да избират от даден списък. Ще обсъдим как да извършим автоматично попълване на данни за проверка на падащ списък в Excel.

Изтегляне на работна тетрадка за практика

Изтеглете тази учебна тетрадка, за да се упражнявате, докато четете тази статия.

Автоматично попълване на данни за валидиране на списък с падащи списъци.xlsm

2 метода за автоматично попълване на падащ списък с валидиране на данни в Excel

Ще покажем 2 различни методи за автоматично попълване на падащия списък за валидиране на данни в Excel. Ще разгледаме следния набор от данни за автоматично попълване на валидиране на данни.

1. Автоматично попълване на списък с падащи списъци за валидиране на данни с помощта на VBA кодове в Combo Box Control

Ние ще вмъкнем обичай VBA код с Контрол ActiveX инструмент за автоматично извършване на валидиране на данни от падащия списък в Excel.

Стъпка 1:

  • Първо трябва да добавим Разработчик в лентата. Отидете в Файл> Опции .
  • Изберете Персонализиране на лентата опция от Опции за Excel .
  • Отбележете Разработчик и натиснете OK .

Стъпка 2:

  • Изберете Вмъкване на от Разработчик таб.
  • Сега изберете Комбинирана кутия от Контрол ActiveX .

Стъпка 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 =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. Автоматично попълване на падащ списък с проверка на данните с Combo Box от ActiveX Controls

Ще използваме само Контрол ActiveX за автоматично валидиране на данните.

Стъпка 1:

  • Изберете Вмъкване на група от Разработчик таб.
  • Изберете Комбинирана кутия от Контрол ActiveX .

Стъпка 2:

  • Поставете Комбинирана кутия на всяко празно място в набора от данни.
  • След това натиснете десния бутон на мишката.
  • Изберете Имоти от списъка.

Стъпка 3:

  • Сега поставете C5 в Свързана клетка поле, тъй като данните ще се показват в Клетка C5 .
  • Поставете $B$5:$B$9 на ListFillRange област.
  • Изберете 1-fmMatchEntryComplete за MatchEntry и запишете промените.

Стъпка 4:

  • Сега деактивирайте Режим на проектиране от Разработчик таб.

Стъпка 5:

  • Сега поставете която и да е буква в полето за избор и ще се появи предложението. И накрая, данните ще бъдат прегледани на Клетка C5 .

Прочетете още: Как да създадете падащ списък в Excel за валидиране на данни (8 начина)

Заключение

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

Хю Уест е опитен обучител и анализатор на Excel с над 10 години опит в индустрията. Има бакалавърска степен по счетоводство и финанси и магистърска степен по бизнес администрация. Хю има страст към преподаването и е разработил уникален подход на преподаване, който е лесен за следване и разбиране. Неговите експертни познания по Excel са помогнали на хиляди студенти и професионалисти по целия свят да подобрят уменията си и да постигнат отлични резултати в кариерата си. Чрез своя блог Хю споделя знанията си със света, като предлага безплатни уроци за Excel и онлайн обучение, за да помогне на хората и фирмите да достигнат пълния си потенциал.