Innehållsförteckning
Datavalidering är en intressant funktion i Excel. Den här funktionen ger användaren kontroll över hur han eller hon matar in värden i en cell. Användaren kan inte mata in vad han eller hon vill. Han eller hon måste välja från en given lista. Vi kommer att diskutera hur man utför autokomplettering av datavalidering i en rullgardinslista i Excel.
Ladda ner övningsboken
Ladda ner den här arbetsboken för att träna medan du läser den här artikeln.
Autocomplete Data Validation Drop-Down List.xlsm
2 metoder för att automatiskt komplettera datavalidering Drop-Down-lista i Excel
Vi kommer att visa 2 olika metoder för att automatiskt komplettera rullgardinslistan för datavalidering i Excel. Vi kommer att använda följande dataset för automatisk datavalidering.
1. Autocomplete Data Validation Drop-Down List med VBA-koder i Combo Box Control
Vi lägger in anpassade VBA med koden med den ActiveX-kontroll för att utföra datavalidering från rullgardinslistan automatiskt i Excel.
Steg 1:
- Först måste vi lägga till Utvecklare i bandet. Gå till Fil> Alternativ .
- Välj Anpassa bandet alternativet från Excel-alternativ .
- Kryssa för Utvecklare och tryck på OK .
Steg 2:
- Välj Infoga från Utvecklare fliken.
- Välj nu Kombibox från ActiveX-kontroll .
Steg 3:
- Sätt in Kontrollbox på datamängden.
- Klicka på höger musknapp och välj Egenskaper från listan.
Steg 4:
- Ändra den Namn till TempComboBox från Egenskaper fönster.
Steg 5:
- Gå till Namn på bladet fält.
- Välj den Visa kod från listan.
Nu kan en VBA-kommandomodulen kommer att dyka upp. Vi måste sätta VBA kod på den modulen.
Steg 6:
- Kopiera och klistra in följande VBA kod på modulen.
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
Steg 7:
- Spara nu den VBA koden och gå till datasetet. Stäng av Konstruktionsläge från Utvecklare fliken.
Steg 8:
- Välj Cell C5 .
- Välj den Verktyg för data gruppen från Uppgifter fliken.
- Välj Validering av data från listan.
Steg 9:
- Validering av data fönstret visas. Välj Lista i den Tillåt fält.
- I Källa Välj referensvärdesintervallet i fältet.
- Tryck sedan på OK .
Steg 10:
- Gå till en valfri cell i Urval kolumnen och tryck på en valfri första bokstav.
När vi lägger in en bokstav visas motsvarande förslag på den cellen.
Fyll nu i alla celler med det val du vill göra från listan med förslag.
Läs mer: Datavalidering Drop Down List med VBA i Excel (7 applikationer)
2. Autocomplete Data Validation Drop-Down List med en Combo Box från ActiveX Controls
Vi kommer endast att använda de ActiveX-kontroll för automatisk datavalidering.
Steg 1:
- Välj Infoga gruppen från Utvecklare fliken.
- Välj Kombibox från ActiveX-kontroll .
Steg 2:
- Placera den Kombibox på ett tomt utrymme i datamängden.
- Tryck sedan på höger musknapp.
- Välj Egenskaper från listan.
Steg 3:
- Nu ska du sätta C5 i den Länkad cell fältet, eftersom uppgifterna kommer att visas på Cell C5 .
- Lägg till $B$5:$B$9 på ListFillRange fält.
- Välj 1-fmMatchEntryComplete för MatchEntry fältet och spara ändringarna.
Steg 4:
- Inaktivera nu Konstruktionsläge från Utvecklare fliken.
Steg 5:
- Sätt nu en bokstav i kombinationsrutan och förslaget kommer att visas. Slutligen kommer data att visas på Cell C5 .
Läs mer: Hur man skapar Excel Drop Down List för datavalidering (8 sätt)
Slutsats
I den här artikeln har vi utfört följande validering av data från rullgardinslistan Vi har lagt till autokomplettering av datavalidering från rullgardinslistan i Excel. Jag hoppas att detta uppfyller dina behov. Ta en titt på vår webbplats. Exceldemy.com och ge dina förslag i kommentarsfältet.