Hurtigt valg fra excel-rullelisten. Opret en liste i Excel

Option Eksplicit Option Sammenlign tekst Dim bu As Boolean Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.CountLarge > 1 Then Exit Sub If Target.Row = 1 Then Me.TextBox1.Visible = False: Me.ListBox1.Visible = False: Exit Sub Hvis Target.Column = 3 Derefter "nummer på kolonnen, hvor vi indtaster værdierne bu = True With Me.TextBox1 .Top = Target.Top: .Text = Target.Value: .Activate End With Me. ListBox1 .Top = Target .Top + 5 If (.Top + .Height + ActiveWindow.PointsToScreenPixelsY(0) * Application.InchesToPoints(1) * 15 / 1440) > _ (ActiveWindow.Application.Height + ActiveWindow.Top)Application.Top Så _ .Top = .Top - .Height + Target.Height "* ActiveWindow.Zoom / 100 .Clear End With bu = False Me.TextBox1.Visible = True: Me.ListBox1.Visible = True Else Me.TextBox1.Visible = False: Me.ListBox1 .Visible = False End If End Sub Private Sub TextBox1_Change() If Len(TextBox1.Text) = 0 Eller bu Så Afslut Sub "hvis der ikke er nogen tegn at søge - afslut Dim x, i As Long, txt As String, lt As Long, s As String txt = TextBox1.Text: lt = Len(TextBox1.Text) "Hvor vi ser efter værdierne x = Sheets("nomenklatur";).Columns(1).SpecialCells( 2).Offset(1).Værdi "(! LANG: For i = 1 Til UBound(x, 1)" поиск по первым буквам "If txt = Mid(x(i, 1), 1, lt) Then s = s & x(i, 1) & "~" For i = 1 To UBound(x, 1) "поиск по любому вхождению If InStr(x(i, 1), txt) Then s = s & "~" & x(i, 1) Next i ListBox1.List = Split(s, "~";) End Sub Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = 13 Or KeyCode = 9 Then With Me.TextBox1 ActiveCell.Value = .Value .Visible = False: ListBox1.Visible = False End With ActiveCell(2, 1).Select End If End Sub Private Sub ListBox1_Click() If ListBox1.ListIndex = -1 Then Exit Sub Application.EnableEvents = False bu = True With Me.ListBox1 ActiveCell.Value = .Value Me.TextBox1.Text = .Value Me.TextBox1.Visible = False: .Visible = False End With Application.EnableEvents = True bu = False End Sub Private Sub Worksheet_Change(ByVal Target As Range) Dim lReply As Long If Target.Column = 2 Then Exit Sub If Not Intersect(Target, Range("C2:C100000";)) Is Nothing Then If IsEmpty(Target) Then Exit Sub If WorksheetFunction.CountIf(Sheets("номенклатура";).Columns(1), Target) = 0 Then lReply = MsgBox("Добавить введенное имя " & Target & " в выпадающий список", vbYesNo + vbQuestion) If lReply = vbYes Then Worksheets("номенклатура";).Range("номенклатура";).Cells(Worksheets("номенклатура";).Range("номенклатура";).Rows.Count + 1, 1) = Target End If End If End If Sheets("номенклатура";).Range("номенклатура";).Sort Key1:=Sheets("номенклатура";).Range("A1";), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal "этот код и поможет отсортировать в алфавитном порядке" End Sub !}

Rullelister gør det nemt og bekvemt at indtaste data i regneark. Bare klik på pilen og vælg en mulighed. Du kan tilføje rullelister til Excel-celler, der indeholder muligheder som Ja og Nej, Mænd og Kvinder eller en hvilken som helst anden tilpasset liste over muligheder.

Tilføj en rulleliste til en celle i Excel ret enkel, men processen er ikke intuitiv. Dropdown-lister oprettes ved hjælp af datavalideringsfunktionen. Vi vil oprette en rulleliste med et sæt aldersgrupper for at vise dig, hvordan det gøres.

For at begynde skal du indtaste en liste over aldersgrupper i sekventielle celler efter kolonne eller række. Vi indtastede vores aldersgrupper i cellerne A9 til A13 på det samme regneark som vist nedenfor. Du kan også tilføje din liste over muligheder til et andet regneark i den samme projektmappe.

Nu vil vi navngive vores udvalg af celler for at gøre det nemmere at tilføje dem til rullelisten. For at gøre dette skal du vælge alle de celler, der indeholder rullelisteelementer, og derefter indtaste et navn for celleområdet i feltet Navn over gitteret. Vi navngav vores sortiment Alder.

Vælg nu den celle, hvor du vil tilføje rullelisten, og gå til fanen Data.

Under fanen Dataværktøjer Data Klik på knappen Datavalidering.

Dialogboksen Datavalidering åbnes. På fanen Indstillinger skal du vælge Liste på rullelisten Datatype.

Vi vil nu bruge det navn, vi tildelte det celleområde, der indeholder vores dropdown-listemuligheder. Gå ind =Alder i feltet "Kilde" (hvis du navngav celleområdet noget andet, skal du erstatte "Alder" med det navn). Sørg for at afkrydsningsfeltet Ignorer tomme celler markeret.

Du kan tilføje en pop op-meddelelse, der vises, når en celle på en rulleliste er valgt. For at gøre dette skal du klikke på fanen Besked skal indtastes i dialogboksen Datavalidering. Sørg for at afkrydsningsfeltet Vis værktøjstip, hvis cellen er aktuel installeret. Indtast en meddelelse i felterne Titel og Besked, og klik derefter på OK.

Når cellen, der indeholder rullelisten, er valgt, vil du se en pil ned-knap til højre for cellen. Hvis du har tilføjet en inputmeddelelse, vises den under cellen. Pil ned-knappen vises kun, når en celle er valgt.

Klik på pil ned for at få vist en liste over muligheder og vælg en.

Hvis du beslutter dig for, at du vil fjerne rullelisten fra en celle, skal du åbne dialogboksen Datavalidering som beskrevet ovenfor og klikke på knappen Ryd alt, som er tilgængelig, uanset hvilken fane der er valgt i dialogboksen.

Indstillingerne i dialogboksen Datavalidering nulstilles til deres standardværdier. Klik på OK for at fjerne rullemenuen og gendanne cellen til dens standard.

Hvis en indstilling blev valgt, vil cellen blive udfyldt med værdien af ​​denne indstilling, når rullelisten slettes.

Følg denne proces for at tilføje rullelister til andre celler efter behov. Du kan bruge den samme liste til flere rullemenuer.

Hvis du har mange drop-down lister, som du skal tilføje til et regneark, anbefaler vi, at du placerer indstillingslisterne på et separat Excel regneark og skjuler regnearket for at forhindre ændringer i indstillingerne.

Når du udfylder tabeller, skal du ofte indtaste duplikerede værdier. Excel giver dig mulighed for betydeligt at forenkle dette arbejde og samtidig reducere antallet af inputfejl. Til dette formål bruges rullelister. Vi opretter den nødvendige liste én gang, og derefter indsætter vi en rulleliste i en hvilken som helst celle, hvorfra vi kan vælge den ønskede værdi.

Sådan laver du lister i Excel 2007

For eksempel oprettede jeg en liste over byer i Moskva-regionen. Vælg listen, og opret et navngivet område. For at gøre dette skal du efter højreklikke og vælge "Range name" i kontekstmenuen.

Indstil navnet "City_M_O" og klik på "OK".

Gå nu til cellen, hvor vi vil have en rulleliste, og gå til fanen "Data" i toppanelet. Her har vi brug for knappen "Datavalidering", placeret i gruppen "Arbejde med data". Vælg punktet "Data Check".


I vinduet, der vises, skal du vælge datatypen "List" og i feltet "Kilde" indtaste "=City_M_O", det vil sige navnet på det område, vi har angivet, som indeholder listen.


Det er alt. En rulleliste vises i den celle, vi har angivet, hvorfra vi kan vælge en hvilken som helst værdi. Om nødvendigt kan vi bruge den samme liste i andre celler.


Og vi kan skjule den originale liste, for eksempel på et andet ark, for ikke at ødelægge bordets udseende. Systemet vil stadig fungere, fordi vores liste er i et navngivet område, synligt i hele Excel-projektmappen.

Sådan gør du dette i Excel 2003

Her, for at tildele et navn til området, skal vi gå til menuen "Indsæt".


Og navngivningsvinduet ser lidt anderledes ud.


Vi går også til den celle, vi har brug for, og vælger "Check" fra menuen "Data". Og vinduet, der åbnes, vil være det samme som i Excel 2007.
Erobre Excel og se dig snart!

For at arbejde med en stor mængde data, udføre forskellige beregninger og organisere information i form af tabeller, bruger brugerne hovedsageligt Excel-programmet. For at udføre beregninger og registrering indtastes alle nødvendige data manuelt i den relevante celle på arket, og for at forenkle denne proces noget, kan du oprette en rulleliste i Excel. Men opsætningen er også forbundet med den indledende manuelle indtastning af alle data, og så vil vi se nærmere på, hvordan man laver en rulleliste i Excel, så selve listen over gyldige værdier er på et andet ark uden at fylde hovedarket med data.

Excel-rullelisten oprettes primært for at forhindre dig i at indtaste forkerte oplysninger ved kun at angive værdierne fra den genererede liste til input. At lave en rulleliste i Excel er ret simpelt. Det sværeste er at forberede en komplet liste over acceptable værdier til input, formatere den i form af en kolonne eller række uden tomme celler.

Lad os først overveje et simpelt eksempel på, hvordan man laver en rulleliste i Excel 2010 ved at oprette en liste over gyldige værdier på det samme ark. Lad os f.eks. lave en liste, der angiver et bestemt antal tal, der begrænser antallet, der skal indstilles i den celle, vi har brug for. Herefter skal du placere markøren på det sted, hvor Excel-rullelisten skal være, og gå til fanen "Data", hvor i sektoren "Arbejde med data" find pointen "Datakontrol". Hvis du klikker på pilen, vises en ekstra menu med det samme punkt "Datakontrol".

Når du har valgt dette punkt, vises et vindue, hvor du skal konfigurere verifikationen af ​​indtastede data på fanen "Muligheder". For at gøre dette, i kolonnen "Datatype:" vælge "Liste", og klik på det tilsvarende ikon i kolonnen "Kilde:", vælg en række celler med vores forberedte liste over acceptable værdier. Efter dette, når vi aktiverer den celle, vi har valgt, vises en pil, når der klikkes på den, vises en liste over gyldige værdier, der kan vælges.

Hvis det ønskes, kan du også tilpasse forskellige hints om, hvad der præcist er angivet i cellen med rullelisten. Når du opsætter en rulleliste i Excel, er der to muligheder "Titel:" Og "Besked:", som kan indtastes i bogmærket "Besked skal indtastes" efter at have valgt et punkt i menuen "Datakontrol".

Lad os nu se på, hvordan man laver en rulleliste i Excel 2010, hvis listen over gyldige inputværdier er placeret på et andet ark i det samme Excel-dokument. Faktisk er alt meget enkelt. Vi gør det samme som beskrevet ovenfor, og når vi kommer til at vælge en datakilde, går vi simpelthen til det påkrævede ark og vælger celleområdet.

Der er en mere kompliceret måde. Du kan give en række celler på et andet ark et navn. For at gøre dette skal du vælge dem og gå til fanen "Formler" og vælg "Tildel et navn". For nu at vælge et område af gyldige værdier skal du blot angive navnet på celleområdet efter lighedstegnet.

Den nemmeste måde at fuldføre denne opgave på er som følger. Ved at trykke på højre knap efter celle under datakolonnen opkald kontekstmenu. Interessefeltet her er Vælg fra rullelisten. Det samme kan gøres ved at trykke på tastekombinationen Alt+pil ned.

Denne metode vil dog ikke fungere, hvis du vil oprette en liste i en anden celle, der ikke er i området og i mere end én før eller efter. Følgende metode vil gøre dette.

Standard metode

Påkrævet vælg et celleområde, hvorfra den vil blive oprettet drop-down liste, derefter Indsæt – Navn – Tildel(Excel 2003). I en nyere version (2007, 2010, 2013, 2016) skal du gå til fanen Formler, hvor i afsnittet Specifikke navne find knappen Navneleder.

tryk på knappen skab, indtast et navn, kan du bruge et hvilket som helst navn, hvorefter Okay.

Vælg celler(eller flere), hvor du vil indsætte en rulleliste med obligatoriske felter. Vælg fra menuen Data – Datatype – Liste. I marken Kilde indtast det tidligere oprettede navn, eller du kan blot angive området, som vil være tilsvarende.

Nu kan den resulterende celle være kopi hvor som helst på arket, vil det indeholde en liste over nødvendige tabelelementer. Du kan også strække den for at få en rækkevidde med rullelister.

En interessant pointe er, at når dataene i intervallet ændres, vil listen baseret på det også ændre sig, det vil sige dynamisk.

Brug af kontrollerne

Metoden er baseret på indsætte kontrol kaldet " kombinationsfelt", som vil repræsentere en række data.

Vælg en fane Udvikler(til Excel 2007/2010), i andre versioner skal du aktivere denne fane på båndet i parametre – Tilpas dit feed.

Gå til denne fane - klik på knappen Indsæt. Vælg i kontrollerne Kombinationsfelt(ikke ActiveX) og klik på ikonet. Tegne rektangel.

Højreklik på det - Objektformat.

Ved at linke til en celle skal du vælge det felt, hvor du vil placere elementets serienummer på listen. Klik derefter Okay.

Brug af ActiveX-kontrolelementer

Alt, som i den forrige, skal du bare vælge Kombinationsfelt(ActiveX).

Forskellene er som følger: ActiveX-kontrolelementet kan være i to varianter - tilstand fejlretning, som giver dig mulighed for at ændre parametre, og - mode input, kan du kun prøve data fra den. Ændring af tilstande sker ved hjælp af knappen Designtilstand i fanen Udvikler.

I modsætning til andre metoder tillader dette tune skrifttyper, farver og udfør en hurtig søgning.