Indholdsfortegnelse
Datavalidering er en interessant funktion i Excel. Denne funktion giver brugeren kontrol over at indtaste værdier i en celle. Brugerne kan ikke indtaste, hvad de vil. De skal vælge fra en given liste. Vi vil diskutere, hvordan man udfører automatisk udfyldelse af datavalidering drop-down liste i Excel.
Download arbejdsbog til øvelser
Download denne arbejdsbog til træning, så du kan øve dig, mens du læser denne artikel.
Autocomplete data validering Drop-Down List.xlsm
2 metoder til automatisk udfyldelse af data validering Drop-Down liste i Excel
Vi vil vise 2 forskellige metoder til automatisk udfyldelse af drop-down-listen til datavalidering i Excel. Vi vil se på følgende datasæt til automatisk udfyldelse af datavalidering.
1. Autocomplete Data Validation Drop-Down List ved hjælp af VBA-koder i Combo Box Control
Vi vil indsætte brugerdefinerede VBA kode med den ActiveX-kontrol værktøj til at udføre datavalidering fra rullelisten automatisk i Excel.
Trin 1:
- Først skal vi tilføje Udvikler fanen til båndet. Gå til Fil> Indstillinger .
- Vælg Tilpas båndet fra Excel-muligheder .
- Sæt kryds i Udvikler og tryk på OK .
Trin 2:
- Vælg Indsæt fra den Udvikler fanebladet.
- Vælg nu Kombikasse fra den ActiveX-kontrol .
Trin 3:
- Sæt den Kontrolboks på datasættet.
- Klik på musens højre knap, og vælg Egenskaber fra listen.
Trin 4:
- Ændre den Navn til TempComboBox fra den Egenskaber vindue.
Trin 5:
- Gå til Navn på ark felt.
- Vælg den Se kode fra listen.
Nu er en VBA-kommandomodul Vi skal sætte VBA kode på det pågældende modul.
Trin 6:
- Kopier og indsæt følgende VBA kode på modulet.
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
Trin 7:
- Gem nu den VBA kode og gå til datasættet. Sluk for Designtilstand fra den Udvikler fanebladet.
Trin 8:
- Vælg Celle C5 .
- Vælg den Dataværktøjer gruppe fra den Data fanebladet.
- Vælg Validering af data fra listen.
Trin 9:
- Validering af data vindue vises. Vælg Liste i den Tillad felt.
- I den Kilde feltet vælger referenceværdiområdet.
- Tryk derefter på OK .
Trin 10:
- Gå til en vilkårlig celle i Udvælgelse kolonnen og tryk på et hvilket som helst første bogstav.
Når vi sætter et bogstav ind, vises det tilsvarende forslag på den pågældende celle.
Udfyld nu alle cellerne med vores ønskede valg fra den foreslåede liste.
Læs mere: Dropdown-liste til datavalidering med VBA i Excel (7 programmer)
2. Autocomplete Data Validation Drop-Down List med en Combo Box fra ActiveX Controls
Vi anvender kun de ActiveX-kontrol til automatisk datavalidering.
Trin 1:
- Vælg Indsæt gruppe fra den Udvikler fanebladet.
- Vælg Kombikasse fra den ActiveX-kontrol .
Trin 2:
- Placer den Kombikasse på et hvilket som helst tomrum i datasættet.
- Tryk derefter på musens højre knap.
- Vælg Egenskaber fra listen.
Trin 3:
- Nu skal du sætte C5 i den Forbundet celle feltet, da dataene vil blive vist på Celle C5 .
- Sæt $B$5:$B$9 på ListFillRange felt.
- Vælg 1-fmMatchEntryComplete for den MatchEntry feltet og gem ændringerne.
Trin 4:
- Nu skal du deaktivere Designtilstand fra den Udvikler fanebladet.
Trin 5:
- Nu skal du sætte et bogstav i kombinationsfeltet, og forslaget vil blive vist. Og endelig vil data blive vist på Celle C5 .
Læs mere: Sådan oprettes Excel Drop Down List til datavalidering (8 måder)
Konklusion
I denne artikel har vi udført validering af data fra dropdown-listen Vi har tilføjet automatisk udfyldelse af datavalidering fra drop-down-listen i Excel. Jeg håber, at dette vil opfylde dine behov. Tag et kig på vores websted Exceldemy.com og giv dine forslag i kommentarfeltet.