Obsah
Overovanie údajov je zaujímavá funkcia programu Excel. Táto funkcia ponúka používateľovi kontrolu nad zadávaním hodnôt do bunky. Používatelia nemôžu zadávať, čo chcú. Musia si vybrať z daného zoznamu. Budeme diskutovať o tom, ako vykonať automatické dokončovanie údajov overenie rozbaľovacieho zoznamu v programe Excel.
Stiahnite si cvičebnicu
Stiahnite si tento cvičebný zošit, aby ste si počas čítania tohto článku precvičili svoje zručnosti.
Rozbaľovací zoznam s automatickým dokončovaním údajov.xlsm
2 metódy automatického dokončovania rozbaľovacieho zoznamu s overením údajov v programe Excel
Ukážeme 2 rôzne metódy automatického dopĺňania rozbaľovacieho zoznamu na overovanie údajov v programe Excel. Budeme uvažovať o nasledujúcom súbore údajov na automatické dopĺňanie údajov.
1. Automatické dopĺňanie údajov v rozbaľovacom zozname pomocou kódov VBA v ovládacom prvku Combo Box
Vložíme vlastné VBA kód s Ovládací prvok ActiveX nástroj na automatické overovanie údajov z rozbaľovacieho zoznamu v programe Excel.
Krok 1:
- Najprv musíme pridať Vývojár karta na stuhu. Prejdite na Súbor> Možnosti .
- Vyberte si Prispôsobenie pásky možnosť z Možnosti aplikácie Excel .
- Začiarknite políčko Vývojár a stlačte tlačidlo OK .
Krok 2:
- Vyberte si Vložte z Vývojár tab.
- Teraz vyberte Combo Box z Ovládací prvok ActiveX .
Krok 3:
- Vložte Ovládací box na súbore údajov.
- Kliknite na pravé tlačidlo myši a vyberte položku Vlastnosti zo zoznamu.
Krok 4:
- Zmeniť Názov na TempComboBox z Vlastnosti okno.
Krok 5:
- Prejdite na Názov listu oblasť.
- Vyberte si Zobraziť kód možnosť zo zoznamu.
Teraz, a Príkazový modul VBA sa objaví. Musíme vložiť VBA kód tohto modulu.
Krok 6:
- Skopírujte a vložte nasledujúce údaje VBA kód na module.
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
Krok 7:
- Teraz uložte VBA kód a prejdite do súboru údajov. Vypnite Režim návrhu z Vývojár tab.
Krok 8:
- Vyberte Bunka C5 .
- Vyberte Dátové nástroje skupiny z Údaje tab.
- Vyberte si Overovanie údajov zo zoznamu.
Krok 9:
- Overovanie údajov Zobrazí sa okno. Vyberte Zoznam v Povoľte oblasť.
- V Zdroj vyberte rozsah referenčných hodnôt.
- Potom stlačte tlačidlo OK .
Krok 10:
- Prejdite na ľubovoľnú bunku Výber a stlačte ľubovoľné prvé písmeno.
Keď vložíme písmeno, v danej bunke sa zobrazí príslušný návrh.
Teraz vyplňte všetky bunky podľa nášho požadovaného výberu z navrhovaného zoznamu.
Prečítajte si viac: Rozbaľovací zoznam na overenie údajov pomocou VBA v programe Excel (7 aplikácií)
2. Rozbaľovací zoznam s automatickým doplnením a overením údajov pomocou Combo Boxu z ovládacích prvkov ActiveX
Budeme používať iba Ovládací prvok ActiveX na automatické overovanie údajov.
Krok 1:
- Vyberte si Vložte skupiny z Vývojár tab.
- Vyberte Combo Box z Ovládací prvok ActiveX .
Krok 2:
- Umiestnite Combo Box na akomkoľvek prázdnom mieste súboru údajov.
- Potom stlačte pravé tlačidlo myši.
- Vyberte si Vlastnosti zo zoznamu.
Krok 3:
- Teraz položte C5 v Prepojená bunka pole, pretože údaje sa budú zobrazovať na Bunka C5 .
- Umiestnite stránku . $B$5:$B$9 na stránke . ListFillRange oblasť.
- Vyberte si 1-fmMatchEntryComplete pre MatchEntry a uložte zmeny.
Krok 4:
- Teraz vypnite Režim návrhu z Vývojár tab.
Krok 5:
- Teraz zadajte ľubovoľné písmeno do výberového poľa a zobrazí sa ponuka. A nakoniec sa údaje zobrazia na Bunka C5 .
Prečítajte si viac: Ako vytvoriť rozbaľovací zoznam programu Excel na overovanie údajov (8 spôsobov)
Záver
V tomto článku sme vykonali overenie údajov z rozbaľovacieho zoznamu . Pridali sme automatické dokončovanie overovania údajov z rozbaľovacieho zoznamu programu Excel. Dúfam, že to uspokojí vaše potreby. Pozrite sa, prosím, na našu webovú stránku Exceldemy.com a uveďte svoje návrhy v políčku pre komentáre.