The følgende VBA-kode kan hjelpe deg kombinere dupliserte rader basert på verdien av kolonne A, og følgende kode brukes bare for to kolonner. Så, hvis du har to kolonner data, vil denne koden gjør en tjeneste for deg.
1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window
VBA-kode. Kombinere flere rader i en
Sub CombineRows () 'Oppdater 20131202Dim WorkRng Som RangeDim Dic Som VariantDim arr som VariantOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application.SelectionSet WorkRng = Application.InputBox ( "Range", xTitleId, WorkRng.Address, Type: = 8) Sett Dic = Create ( "Scripting.Dictionary") arr = WorkRng.ValueFor i = 1 å UBound (arr, 1) xVerdi = arr (i, 1) Hvis Dic.Exists (xVerdi) Så Dic (arr (i, 1)) = Dic (arr (i, 1)) & "" &Amp; arr (i, 2) Else Dic (arr (i, 1)) = arr (i, 2) End IfNextApplication.ScreenUpdating = FalseWorkRng.ClearContentsWorkRng.Range ( "A1"). Resize (Dic.Count, 1) = Application. WorksheetFunction.Transpose (Dic.keys) WorkRng.Range ( "B1"). Resize (Dic.Count, 1) = Application.WorksheetFunction.Transpose (Dic.items) Application.ScreenUpdating = TrueEnd Sub3. Deretter trykker du F5-tasten, og en rask boks spretter ut for å minne deg på å velge et område som du må kombinere. Se skjermbilde:
4. Og klikk deretter OK, har verdiene i kolonne B slått sammen til en post og atskilt med mellomrom
. Merk:
1. Denne koden kan ødelegge de opprinnelige dataene, når du bruker den, du bør sikkerhetskopiere dataene først.
2. Denne koden brukes bare for to kolonner, hvis du har mer enn to kolonner, denne koden vil bare kombinere to første kolonnene og fjerne andre kolonner data. Når du bruker denne koden, må du være forsiktig.
Kombiner flere dupliserte rader i en Kutools for Excel
Nå som koden ovenfor har noen begrensninger og risiko, er det en praktisk og sikker måte å avslutte denne jobb? Med Kutools for Excel Advanced Kombiner Rows verktøyet, kan du raskt fjerne flere dupliserte rader i kolonnene du basert på og flette eller gjøre noen beregninger for andre poster i aktuelle cellene.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. . Få den nå
Etter å ha installert Kutools for Excel, kan du gjøre følgende:
1. Velg utvalg data som du ønsker å kombinere duplikater.
To. Klikk deretter Kutools > Innhold Converter > Avansert Kombiner rader. Se skjermbilde:
tre. I avansert Kombiner dialogboksen rader merker du kolonnenavnet som de viktigste kolonnene som du vil kombinere verdier basert på, og klikk deretter Nøkkel kolonner. Se skjermbilde:
4. Deretter går på å klikke på kolonnen du må kombinere sine verdier i én post, og klikk deretter Kombiner operasjoner og velger Bare kombinere med separator, og velg en separator du trenger å skille de samlede verdiene fra listen til høyre. Se skjermbilde:
5. Etter å ha fullført innstillingene, klikk OK, og dataene vil bli slått sammen basert på nøkkelkolonnene og atskilt med skille
. Merk: Hvis du trenger ikke å sette driften for resten kolonner, bare holde standard staten.
Kombiner flere like rader og sum /gjennomsnittlig verdiene med Kutools for Excel
med denne multifunksjonelle Avansert Kombiner Rows verktøyet, kan du kombinere duplikater rader og gjøre noen beregninger for verdiene også.
1. Velg utvalg data som du ønsker å kombinere duplikater.
To. Gå til Advanced Kombiner Rader dialogboksen;
(1.) Velg et kolonnenavn som nøkkelkolonne som du vil beregne andre kolonneverdier basert på, og klikk Nøkkel kolonner da;
< li> (2). Velg den kolonnen som du trenger å gjøre noen beregninger for verdiene, og klikk deretter Kombiner operasjoner > Kombiner beregne, og velg deretter en beregningstype som du trenger, i dette tilfellet, jeg velger Sum. Se skjermbilde:
tre. Hvis du trenger ikke å sette driften for resten kolonner, bare holde standardinnstillingene, og klikk deretter på OK, og de like verdiene i kolonne A vil bli slått sammen, og de tilsvarende verdiene i kolonne B vil bli lagt opp. Se skjermbilder: Search Merknader:
1. Hvis du sjekker Mine data har overskrifter alternativ, dine overskrifter (første rad) av serien vil bli ignorert når du bruker dette verktøyet.
2. Bruk formaterte verdier: det vil beholde formateringen av verdiene etter å kombinere de dupliserte cellene
3.. Dette verktøyet er ikke tilgjengelig for filtrering av data.
Klikk for å vite mer om denne Avansert Kombiner Rows funksjon.
med denne multifunksjonelle Avansert Kombiner Rows verktøyet, kan du kombinere duplikater rader og gjøre noen beregninger for verdiene også.
1. Velg utvalg data som du ønsker å kombinere duplikater.
To. Gå til Advanced Kombiner Rader dialogboksen;
(1.) Velg et kolonnenavn som nøkkelkolonne som du vil beregne andre kolonneverdier basert på, og klikk Nøkkel kolonner da;
< li> (2). Velg den kolonnen som du trenger å gjøre noen beregninger for verdiene, og klikk deretter Kombiner operasjoner > Kombiner beregne, og velg deretter en beregningstype som du trenger, i dette tilfellet, jeg velger Sum. Se skjermbilde:
tre. Hvis du trenger ikke å sette driften for resten kolonner, bare holde standardinnstillingene, og klikk deretter på OK, og de like verdiene i kolonne A vil bli slått sammen, og de tilsvarende verdiene i kolonne B vil bli lagt opp. Se skjermbilder: Search Merknader:
1. Hvis du sjekker Mine data har overskrifter alternativ, dine overskrifter (første rad) av serien vil bli ignorert når du bruker dette verktøyet.
2. Bruk formaterte verdier: det vil beholde formateringen av verdiene etter å kombinere de dupliserte cellene
3.. Dette verktøyet er ikke tilgjengelig for filtrering av data.
Klikk for å vite mer om denne Avansert Kombiner Rows funksjon.