Filtrer Excel -listene dine med en makro på en slik måte at flere oppføringer bare vises én gang i en ny målliste og dermed rydder opp i dataene dine.
Mange lister inneholder dupliserte oppføringer. Noen ganger er det viktig å filtrere disse oppføringene fra en liste. For eksempel kan du bruke en salgsliste til å lage en liste der hver kunde bare vises én gang - dette kan for eksempel være viktig for markedsanalyser.
Tabellen fra figuren nedenfor viser en liten Excel -liste med tall i kolonne B.
Du vil opprette en ny liste fra denne listen, der tall ikke lenger vises to ganger. Nummeret 21, som finnes i cellene B3, B5 og B14 i den opprinnelige listen, vil bare vises én gang i den nye listen.
Det er flere måter du kan gjøre dette på med Excel. Hvis du vil bruke en makro, kan du bruke følgende VBA -kommandoer:
Underliste uten dubletter ()
Dim Source As Range
Dim mål som område
Angi kilde = område ("b1")
Angi mål = område ("d1")
Source.EntireColumn.AdvancedFilter Action: = xlFilterCopy, _
CriteriaRange: = Source.EntireColumn, CopyToRange: = Target, Unique: = True
Slutt Sub
Etter at du har startet makroen, filtrerer Excel tabellen og viser den nye tabellen fra celle D1. Følgende figur viser resultatet:
Du kan se at hver verdi bare vises én gang i resultatlisten.
Bruk KILDE -variabelen til å angi kolonnen i tabellen der dataene er plassert, som du vil generere en ny liste fra uten dupliserte oppføringer. Makroen bruker alltid hele kolonnen som tilhører referansen du definerer med SOURCE. Bruk variabelen til å definere hvilken som helst celleadresse i den tilsvarende kolonnen.
Med variabelen TARGET bestemmer du hvor Excel skriver resultatlisten din. Den nye listen starter på posisjonen du angir med denne variabelen.
Makroen fungerer med det aktive regnearket for både kildeområdet og målområdet.
For å sette inn makroen i en tabell, åpner du den tilsvarende arbeidsboken og trykker på tastekombinasjonen ALT F11 i alle versjoner av Excel for å starte VBA -editoren. Ring kommandoen INSERT - MODULE og sett inn VBA -kommandoene. For å starte makroen fra Excel, bruk tastekombinasjonen ALT F8.
