Ինչպե՞ս համատեղել կրկնօրինակ տողերը և Excel- ում ամփոփել արժեքները:

Excel- ում ， դուք միշտ կարող եք հանդիպել այս խնդրին, երբ ունեք մի շարք տվյալներ, որոնք պարունակում են մի քանի կրկնօրինակ գրառում, և այժմ ցանկանում եք համատեղել կրկնօրինակ տվյալները և համապատասխան սյունակների մեկ այլ սյունակում ամփոփել, ինչպես ցույց է տրված հետևյալ նկարները: Ինչպե՞ս կարող էիք լուծել այս խնդիրը:

Միավորել կրկնօրինակ տողերը և գումարներն ամփոփել Համախմբել գործառույթի հետ

Միավորել կրկնօրինակ տողերը և արժեքներն ամփոփել VBA կոդի հետ

Միավորել կրկնօրինակ տողերը և գումարները գումարել Excel- ի համար Kutools- ի հետ

Համապատասխան տողերը մեկ այլ սյունակում կրկնօրինակ արժեքների հիման վրա միացրեք Kutools- ի համար Excel- ի

Միավորել կրկնօրինակ տողերը և գումարներն ամփոփել Համախմբել գործառույթի հետ

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

1, Կտտացրեք այն բջիջին, որտեղ ցանկանում եք արդյունքը գտնել ձեր ընթացիկ աշխատանքային թերթում:

2, Գնալ կտտացնելու համար Ամսաթիվ > Համախմբել, տես նկարի նկարը.

3, Մեջ Համախմբել երկխոսության տուփ:

• (1.) Ընտրեք Գումար - ից ֆունկցիա բացվող ցուցակ;
• (2.) Կտտացրեք կոճակը ընտրելու համար այն տիրույթը, որը ցանկանում եք համախմբել, և այնուհետև կտտացնել Ավելացնել կոճակը ՝ հղումն ավելացնելու համար Բոլոր հղումները ցուցակի տուփ;
• (3.) Ստուգեք Վերին շարքը և Ձախ սյունակ - ից Օգտագործեք պիտակները ներսից տարբերակ: Տեսեք,

4, Պարամետրերն ավարտելուց հետո կտտացրեք OK, և կրկնօրինակները զուգորդվում և ամփոփվում են: Տեսեք,

ՆշումԵթե ​​տիրույթը չունի վերնագրի տող, ապա ձեզ հարկավոր է ապանշել Վերին շարքը - ից Օգտագործեք պիտակները ներսից տարբերակ.

Միավորել կրկնօրինակ տողերը և արժեքներն ամփոփել VBA կոդի հետ

Հետևյալ VBA կոդը կարող է նաև օգնել ձեզ կրկնօրինակ տողերը միավորել աշխատաթերթում, բայց միևնույն ժամանակ, բնօրինակ տվյալները կկործանվեն, դուք պետք է կրկնօրինակեք տվյալների կրկնօրինակը:

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

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

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

Sub CombineRows()
'Updateby Extendoffice
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)
    Dic(arr(i, 1)) = Dic(arr(i, 1)) + arr(i, 2)
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 ստեղնը այս կոդն աշխատեցնելու համար, և դուք պետք է ընտրեք այն ընդգրկույթը, որը ցանկանում եք համախմբել դուրս եկած հուշման վանդակում: Տեսեք,

4. Եվ այնուհետեւ կտտացրեք OK, կրկնօրինակ տողերը միավորվել են և արժեքները գումարվում են:

ՆշումԵթե ​​ցանկանում եք օգտագործել այս ծածկագիրը, ավելի լավ է ֆայլի պատճեն պատրաստեք ՝ տվյալները ոչնչացնելուց խուսափելու համար, և այս կոդը կիրառվում է միայն երկու սյունակի վրա:

Միավորել կրկնօրինակ տողերը և գումարները գումարել Excel- ի համար Kutools- ի հետ

Այստեղ ես ներկայացնում եմ հարմար գործիքը - Excel- ի համար նախատեսված գործիքներ ձեզ համար ՝ դա Ընդլայնված կոմբինատ տողեր նույնպես կարող է արագորեն լավություն անել այս խնդիրը լուծելու համար:

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներխնդրում եմ արեք հետևյալը.

1. Ընտրեք ձեզ անհրաժեշտ տիրույթը և կտտացրեք Կուտոլս > Միաձուլում և պառակտում > Ընդլայնված կոմբինատ տողեր, Տեսեք,

2, Մեջ Ընդլայնված կոմբինատ տողեր երկխոսություն, ստուգում Իմ տվյալներն ունեն վերնագրեր եթե ձեր տիրույթն ունի վերնագրեր, և ընտրեք սյունակի անունը, որը ցանկանում եք համատեղել կրկնօրինակները և կտտացրեք Առաջնային բանալին, տես նկարի նկարը.

3, Եվ ապա ընտրեք սյունակի անունը, որը ցանկանում եք ամփոփել արժեքները և կտտացնել Հաշվել > Գումար կամ այլ հաշվարկներ, որքան անհրաժեշտ է: Տեսեք,

4: Սեղմեք Ok երկխոսությունը փակելու համար, ապա կտեսնեք, որ կրկնօրինակները միավորված են, և մեկ այլ սյունակում համապատասխան տվյալները գումարվում են միասին: Տեսեք սքրինշոթեր.

Սեղմեք այստեղ ՝ Advanced Combine Rows- ի մասին ավելին իմանալու համար:

Համապատասխան տողերը մեկ այլ սյունակում կրկնօրինակ արժեքների հիման վրա միացրեք Kutools- ի համար Excel- ի

Երբեմն, դուք ցանկանում եք միավորել տողերը `հիմնվելով մեկ այլ սյունակի կրկնօրինակ արժեքների վրա` the Ընդլայնված կոմբինատ տողեր of Excel- ի համար նախատեսված գործիքներ կարող է նաև լավություն անել ձեզ համար, խնդրում եմ արեք հետևյալ կերպ.

1, Ընտրեք տվյալների տիրույթը, որը ցանկանում եք օգտագործել, ապա կտտացրեք Կուտոլս > Միաձուլում և պառակտում > Ընդլայնված կոմբինատ տողեր հնարավորություն ընձեռել Ընդլայնված կոմբինատ տողեր երկխոսության վանդակում:

2, Մեջ Ընդլայնված կոմբինատ տողեր երկխոսության տուփ, կտտացրեք սյունակի անունը, որի վրա ցանկանում եք միավորել այլ տվյալների հիման վրա, և կտտացրեք Առաջնային բանալին, տես նկարի նկարը.

3. Եվ այնուհետև կտտացրեք մեկ այլ սյունակի անունը, որը ցանկանում եք միավորել տվյալները և կտտացրեք Միավորել ձեր համակցված արժեքներն առանձնացնելու համար տարանջատիչ ընտրելու համար տես նկարի նկարը.

4. Այնուհետեւ կտտացրեք Ok, A սյունակում գտնվող նույն բջիջով բոլոր արժեքները միավորվել են միասին, տե՛ս սքրինշոթեր.

Միավորել կրկնօրինակ տողերը և գումարները գումարել Excel- ի համար Kutools- ի հետ

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

Միավորել բազմաթիվ տողեր մեկում ՝ կրկնօրինակ արժեքների հիման վրա

---

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

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

• Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
• Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
• Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
• Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
• Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
• Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
• Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
• Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
• Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ... 

---

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

• Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
• Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
• Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ...