Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս Excel- ում կրկնօրինակների հիման վրա բազմաթիվ տողեր միավորել մեկի մեջ:

Միգուցե, ունեք սքրինշոթի հետևյալ տվյալները. Ապրանքի անվան սյունակում կան մի քանի կրկնօրինակ տարրեր, և այժմ դուք պետք է հեռացնեք A սյունակի կրկնօրինակ գրառումները, բայց համատեղեք համապատասխան արժեքները B սյունակում, տեսեք սքրինշոթերը.

doc- առաջադեմ-կոմբինատ 1 -2 doc- առաջադեմ-կոմբինատ 2

Այս խնդիրը լուծելու մի քանի արդյունավետ եղանակներ ունեք:

Միավորել բազմաթիվ կրկնօրինակ տողերը մեկի մեջ VBA կոդի հետ

Միացրեք բազմաթիվ կրկնօրինակ տողեր Excel- ի մեկ Kutools- ի մեջ

Միավորել բազմաթիվ կրկնօրինակ շարքեր և գումարել / միջինացնել արժեքները Excel- ի համար Kutools- ի հետ


նետ կապույտ աջ պղպջակՄիավորել բազմաթիվ կրկնօրինակ տողերը մեկի մեջ VBA կոդի հետ

Հաջորդ VBA կոդը կարող է օգնել ձեզ միավորել կրկնօրինակ տողերը ՝ հիմնվելով A սյունակի արժեքի վրա, և հետևյալ կոդը կիրառվում է միայն երկու սյունակի համար: Այսպիսով, եթե դուք ունեք երկու սյունակի տվյալներ, այս ծածկագիրը ձեզ լավություն կանի:

1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.

VBA կոդ. Միավորել բազմաթիվ տողեր մեկի մեջ

Sub CombineRows()
'Update 20131202
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.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 = True
End Sub

3, Դրանից հետո սեղմեք F5 ստեղնը, և հուշում է արագ տուփը ՝ հիշեցնելու համար, որ պետք է ընտրել այն տիրույթը, որն անհրաժեշտ է համատեղել: Տեսեք,

doc- առաջադեմ-կոմբինատ 3

4. Եվ այնուհետեւ կտտացրեք OK, B սյունակի արժեքները միավորվել են մեկ գրառման մեջ և բաժանվել բացատներով:

doc- առաջադեմ-կոմբինատ 4

Նշումներ:

1. Այս կոդը կարող է ոչնչացնել բնօրինակ տվյալները, երբ դրանք օգտագործում եք, ավելի լավ է նախ պահուստավորեք տվյալները:

2. Այս կոդը կիրառվում է միայն երկու սյունակի համար, եթե ունեք ավելի քան երկու սյունակ, այս ծածկագիրը կմիավորի միայն առաջին երկու սյունակները և կհեռացնի այլ սյունակների տվյալները: Այս ծածկագիրն օգտագործելիս պետք է զգույշ լինել:


նետ կապույտ աջ պղպջակՄիացրեք բազմաթիվ կրկնօրինակ տողեր Excel- ի մեկ Kutools- ի մեջ

Հիմա, երբ վերոնշյալ ծածկագիրը որոշակի սահմանափակումներ և ռիսկեր ունի, կա՞ այս գործը ավարտելու հարմար և անվտանգ միջոց: Հետ Excel- ի համար նախատեսված գործիքներ'S Ընդլայնված կոմբինատ տողեր օգտակար, դուք կարող եք արագորեն հեռացնել բազմաթիվ կրկնօրինակ տողեր ձեր կողմից հիմնված սյունակներում և միաձուլվել կամ կատարել որոշ հաշվարկներ այլ գրառումների համար համապատասխան բջիջներում:

Excel- ի համար նախատեսված գործիքներ ներառում է ավելի քան 300 հարմար Excel գործիքներ: Փորձեք առանց սահմանափակումների 30 օրվա ընթացքում: Get it Now.

Excel- ի համար Kutools- ը տեղադրելուց հետո կատարեք հետևյալը.

1, Ընտրեք ընդգրկույթի տվյալները, որոնք ցանկանում եք համատեղել կրկնօրինակները:

doc- առաջադեմ-կոմբինատ 5

2. Այնուհետեւ կտտացրեք Կուտոլս > Բովանդակության փոխարկիչ > Ընդլայնված կոմբինատ տողեր, Տեսեք,

doc- առաջադեմ-կոմբինատ 6

3, Մեջ Ընդլայնված կոմբինատ տողեր երկխոսության տուփ, ընտրեք սյունակի անունը որպես հիմնական սյունակներ, որոնց հիման վրա ցանկանում եք միավորել արժեքները, ապա կտտացնել Հիմնական սյուններ, Տեսեք,

doc- առաջադեմ-կոմբինատ 7

4, Դրանից հետո կտտացրեք այն սյունակին, որը անհրաժեշտ է միավորել դրանց արժեքները մեկ գրառման մեջ և այնուհետև կտտացնել Միավորել գործողությունները եւ ընտրեք Միավորել միայն տարանջատիչով, և ընտրեք մեկ տարանջատիչ, որն անհրաժեշտ է ճիշտ ցուցակից առանձնացնելու համակցված արժեքները: Տեսեք,

doc- առաջադեմ-կոմբինատ 8

5, Պարամետրերն ավարտելուց հետո կտտացրեք OK, և ձեր տվյալները միաձուլվելու են հիմնական սյունակների հիման վրա և բաժանվելու են բաժանարարներով:

doc- առաջադեմ-կոմբինատ 9

Նշում: Եթե ​​Ձեզ անհրաժեշտ չէ մնացած սյունակների գործողությունները սահմանել, պարզապես պահեք լռելյայն վիճակը:


նետ կապույտ աջ պղպջակՄիավորել բազմաթիվ կրկնօրինակ շարքեր և գումարել / միջինացնել արժեքները Excel- ի համար Kutools- ի հետ

Այս բազմաֆունկցիոնալով Ընդլայնված կոմբինատ տողեր օգտակար, դուք կարող եք համատեղել կրկնօրինակ տողեր և որոշ հաշվարկներ կատարել նաև արժեքների համար:

1, Ընտրեք ընդգրկույթի տվյալները, որոնք ցանկանում եք համատեղել կրկնօրինակները:

2. Գնալ դեպի Ընդլայնված կոմբինատ տողեր երկխոսության տուփ;

  • (1.) Ընտրեք սյունակի անունը որպես հիմնական սյունակ, որի հիման վրա ցանկանում եք հաշվարկել սյունակի այլ արժեքներ, ապա կտտացրեք Հիմնական սյուններ;
  • (2.) Ընտրեք այն սյունակը, որն անհրաժեշտ է արժեքների որոշ հաշվարկներ կատարելու համար, և այնուհետև կտտացրեք Միավորել գործողությունները > Միավորել հաշվարկել, ապա ընտրեք ձեզ անհրաժեշտ հաշվարկման մեկ տեսակ, այս դեպքում ես ընտրում եմ Գումար, Տեսեք,

doc- առաջադեմ-կոմբինատ 10

3, Եթե ​​Ձեզ անհրաժեշտ չէ մնացած սյունակների գործողությունները սահմանել, պարզապես պահեք լռելյայն վիճակը, ապա կտտացրեք OK, և A սյունակի կրկնօրինակ արժեքները միաձուլվելու են և B սյունակում դրանց համապատասխան արժեքները գումարվելու են: Տեսեք սքրինշոթերը.

doc- առաջադեմ-կոմբինատ 11 -2 doc- առաջադեմ-կոմբինատ 12

Նշումներ:

1. Եթե ստուգում եք Իմ տվյալներն ունեն վերնագրեր տարբերակը, այս օգտակար ծրագիրը կիրառելիս անտեսվում են տիրույթի ձեր վերնագրերը (առաջին շարքը):

2. Օգտագործեք ձևաչափված արժեքներայն կպահպանի արժեքների ձևաչափումը կրկնօրինակ բջիջները համատեղելուց հետո:

3. Այս օգտակար ծրագիրը հասանելի չէ տվյալների զտման համար:

Կտտացրեք ՝ այս Advanced Combine Rows գործառույթի մասին ավելին իմանալու համար:


Առնչվող հոդված:

Միավորել կրկնօրինակ տողերը և գումարել արժեքները

Գրասենյակի արտադրողականության լավագույն գործիքները

Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50 + Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

kte էջանիշը 201905


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have used the code above successfully in the past however today, it is deleting column B. Looks like it's just removing duplicates...not sure what the issue is.

Sample Data
Reece, Ashley G01-Registered-UWG
Reece, Chris G02-Registered-KSU
Reece, Chris G03-Dropped-KSU
Reece, Jayden G02-Registered-UNG
Reece, Jayden G02-Withdrawn-UNG
This comment was minimized by the moderator on the site
I have in column A

1 Cast
2 Crew
3 Hiring
4 Cast
5 Hiring
6 Crew

I need these unique CAST CREW AND HIRING in another column without delete in column A entries.

Ex: I need (after formula)

1 Cast
2 Crew
3 Hiring

Is it possible by formula?
This comment was minimized by the moderator on the site
Above Macro only Combine the limited cell(e.g 20 cells) in b column. How to Combine more cells
This comment was minimized by the moderator on the site
Same - 2021 and this still only works if you have like 20 rows...
This comment was minimized by the moderator on the site
I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?
This comment was minimized by the moderator on the site
Same here. I was about to purchase because the tools are very nice, but figured I would try it first. Combine never works. I tried it for about 3 weeks now and it always locks up. No matter the power of my computer (ran on my at home powerhouse computer, same issue)
I kept cutting down to less and less data to see if it would work but it still would not.
The last one I tried was 4 columns and 100k rows and it still locked up. Not very useful unless you have like < 100 rows or something.
This comment was minimized by the moderator on the site
Same here, I filtered my data all the way down to 4 columns and 100k rows and it still work not work. I have tried this for 3 weeks now and unable to successfully complete my task. Kutools will only work if you have very few rows.
This comment was minimized by the moderator on the site
[quote]I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?By David Greene[/quote] Sorry, we will fix it in next version.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations