Hvordan filtreres data fra rullelistevalg i Excel?
I Excel kan de fleste af os muligvis filtrere data ved hjælp af filterfunktionen. Men har du nogensinde prøvet at filtrere data fra rullelistevalget? For eksempel, når jeg vælger et element fra rullelisten, vil jeg have, at dets tilsvarende rækker filtreres ud som følgende skærmbillede vist. Denne artikel vil jeg tale om, hvordan man filtrerer data ved hjælp af rullelisten i et eller to regneark.
Filtrer data fra rullelistevalg i et regneark med hjælperformler
Filtrer data fra rullelistevalg i to regneark med VBA-kode
Filtrer data fra rullelistevalg i et regneark med hjælperformler
For at filtrere data fra rullelisten kan du oprette nogle hjælpeformelkolonner. Benyt følgende trin en efter en:
1. Indsæt først rullelisten. Klik på en celle, hvor du vil indsætte rullelisten, og klik derefter på data > Datavalidering > Datavalidering, se skærmbillede:
2. I poppet ud Datavalidering under dialogboksen Indstillinger fanebladet, vælg Liste fra Tillad drop down, og klik derefter på knap for at vælge den dataliste, du vil oprette rullelisten baseret på, se skærmbillede:
3. Og klik derefter på OK knappen, indsættes rullelisten på én gang, og vælg et element på rullelisten, og indtast derefter denne formel: = RÆKER ($ A $ 2: A2) (A2 er den første celle i kolonnen, der indeholder rullelisteværdien) i celle D2, og træk derefter fyldhåndtaget ned til cellerne for at anvende denne formel, se skærmbillede:
4. Fortsæt med at indtaste denne formel: = HVIS (A2 = $ H $ 2, D2, "") ind i celle E2, og træk derefter fyldhåndtaget ned for at udfylde denne formel, se skærmbillede:
Bemærk: I ovenstående formel :A2 er den første celle i kolonnen, der indeholder rullelisteværdien ,H2 er cellen, hvor rullelisten er placeret, D2 er den første hjælpekolonneformel.
5. Og skriv derefter denne formel: = FEJL (LITEN ($ E $ 2: $ E $ 17, D2), "") i celle F2, træk derefter fyldhåndtaget ned til cellerne for at udfylde denne formel, se skærmbillede:
Bemærk: I ovenstående formel: E2: E17 er den anden hjælperformelceller, D2 er den første celle i den første hjælperformel-kolonne.
6. Efter indsættelse af hjælpeformelkolonnerne, skal du sende det filtrerede resultat til en anden placering. Anvend venligst denne formel: =IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"") ind i celle J2, og træk derefter fyldhåndtaget fra J2 til L2, og den første registrering af dataene baseret på rullelisten er blevet ekstraheret, se skærmbillede:
Bemærk: I ovenstående formel: A2: C17 er de originale data, du vil filtrere, F2 er den tredje hjælpeformelsekolonne, J2 er den celle, hvor du vil sende filterresultatet.
7. Og fortsæt derefter med at trække påfyldningshåndtaget ned til cellerne for at vise alle tilsvarende filtrerede poster, se skærmbillede:
8. Fra nu af, når du vælger et element fra rullelisten, filtreres alle rækker baseret på dette valg på én gang, se skærmbillede:
Supercharge Excel dropdown lister med Kutools forbedrede funktioner
Øg din produktivitet med Kutools til Excels forbedrede rullelistefunktioner. Dette funktionssæt rækker ud over de grundlæggende Excel-funktioner for at strømline din arbejdsgang, herunder:
- Rulleliste med flere valg: Vælg flere poster samtidigt for effektiv datahåndtering.
- Rulleliste med afkrydsningsfelter: Forbedre brugerinteraktion og klarhed i dine regneark.
- Dynamisk rulleliste: Opdaterer automatisk baseret på dataændringer, hvilket sikrer nøjagtighed.
- Søgbar rulleliste: Find hurtigt nødvendige poster, spar tid og reducerer besværet.
Filtrer data fra rullelistevalg i to regneark med VBA-kode
Hvis din rullelistecelle i Ark1 og de filtrerede data i Ark2, når du vælger et element fra rullelisten, filtreres et andet ark ud. Hvordan kunne du afslutte dette job i Excel?
Følgende VBA-kode kan gøre dig en tjeneste, vær venlig at gøre som dette:
1. Højreklik på arkfanen, der indeholder rullelisten, og vælg derefter Vis kode fra genvejsmenuen i det åbnede Microsoft Visual Basic til applikationer vindue, kopier og indsæt følgende kode i det tomme modul:
VBA-kode: Filtrer data fra rullelistevalg i to ark:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
On Error Resume Next
If Not Intersect(Range("A2"), Target) Is Nothing Then
Application.EnableEvents = False
If Range("A2").Value = "" Then
Worksheets("Sheet2").ShowAllData
Else
Worksheets("Sheet2").Range("A2").AutoFilter 1, Range("A2").Value
End If
Application.EnableEvents = True
End If
End Sub
Bemærk: I ovenstående kode: A2 er den celle, der indeholder rullelisten, og Sheet2 er regnearket indeholder de data, du vil filtrere. Nummeret 1 i manuskriptet: Autofilter 1 er det kolonnenummer, du vil filtrere ud fra. Du kan ændre dem til dit behov.
2. Fra nu af, når du vælger et element fra rullelisten i Ark1, og de tilsvarende data filtreres ud i Ark2, se skærmbillede:
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!