Note: The other languages of the website are Google-translated. Back to English

Ինչպե՞ս արագ միավորել տողերը ՝ հիմնվելով մեկ սյունակի արժեքի վրա, ապա որոշ հաշվարկներ անել Excel- ում:

Օրինակ, դուք ունեք տվյալների մի շարք, և մեկ սյունակում կան կրկնօրինակներ, այժմ դուք ցանկանում եք միացնել շարքերի հիմքերը A սյունակը (ունի կրկնօրինակներ), ապա կատարել որոշ հաշվարկներ մեկ այլ սյունակի վրա `միավորված շարքերի հիման վրա, ինչպես ցույց է տրված նկարում.

Excel- ում չկա մեկ սյունակի արժեքի հիման վրա շարքերը միաձուլելու արագ մեթոդ, բայց այստեղ ես ներկայացնում եմ
հնարքներ, որոնք կարող են օգնել ձեզ միավորել կրկնօրինակ տողերը, ապա գումարել կամ կատարել այլ հաշվարկներ մեկ այլ սյունակում:


նետ կապույտ աջ պղպջակ Միաձուլեք տողերը մեկ սյունակի հիման վրա, ապա գումարները գումարեք VBA- ի հետ

Կա VBA կոդ, որը կարող է օգնել ձեզ միավորել կրկնօրինակ տողերը, ապա գումարել մեկ այլ սյունակի արժեքներ:

Ներդիրով զննում և խմբագրում բազմաթիվ Excel աշխատանքային գրքեր / Word փաստաթղթեր ՝ Firefox, Chrome, Internet Explore 10:

Ձեզ կարող է ծանոթ լինել Firefox / Chrome / IE- ում մի քանի վեբ էջեր դիտելու և դրանց միջև փոխելու միջոցով ՝ հեշտությամբ սեղմելով համապատասխան ներդիրները: Այստեղ Office Tab- ն աջակցում է նմանատիպ վերամշակման, որը թույլ է տալիս թերթել բազմաթիվ Excel գրքեր կամ Word փաստաթղթեր մեկ Excel պատուհանում կամ Word պատուհանում և հեշտությամբ փոխել նրանց միջև ՝ կտտացնելով դրանց ներդիրներին: Սեղմեք անվճար 30Office Tab-ի օրական փորձարկում:

ot գերազանցել

1. Մամուլ F11 + Alt հնարավորություն տալու ստեղները Microsoft Visual Basic հավելվածների համար պատուհանը, ապա կտտացրեք Տեղադրել > Մոդուլներ և պատճենեք և կպցրեք VBA կոդի տակ նորում Մոդուլներ պատուհան.

VBA. Միաձուլեք տողերը ՝ հիմնվելով մեկ սյունակի արժեքի վրա

Sub MG30Nov12()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range
Dim nRng As Range
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set InputRng = InputRng.Parent.Range(InputRng.Columns(1).Address)
With CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
For Each Rng In InputRng
    If Not .Exists(Rng.Value) Then
        .Add Rng.Value, Rng.Offset(, 1)
    Else
        .Item(Rng.Value).Value = .Item(Rng.Value).Value + Rng.Offset(, 1)
            If nRng Is Nothing Then
                Set nRng = Rng
            Else
                Set nRng = Union(nRng, Rng)
            End If
    End If
Next
If Not nRng Is Nothing Then
    nRng.EntireRow.Delete
End If
End With
End Sub

2. Մամուլ F5 կամ սեղմեք Վազում VBA- ն գործարկելու կոճակ, և աշխատելու համար տվյալների տիրույթ ընտրելու համար բացվում է երկխոսություն: տե՛ս սքրինշոթը.

doc սյունակները մի սյունակի հիման վրա 3

3. Աշխատանքային տիրույթ ընտրելուց հետո կտտացրեք OK, Այժմ տվյալները միավորվել են ըստ առաջին սյունակի և ամփոփում են արժեքները երկրորդ սյունակում:

doc սյունակները մի սյունակի հիման վրա 4

ՆշումԱյս VBA կոդը պարզապես կարող է ճիշտ աշխատել, երբ միաձուլվում են առաջին սյունակի և երկրորդ սյունակի գումարային արժեքների վրա:


նետ կապույտ աջ պղպջակ Միաձուլեք տողերը մեկ սյունակի հիման վրա, ապա արժեքներն ամփոփեք Advanced Combine Rows- ի հետ

Եթե ​​ծանոթ չեք VBA կոդին, կարող եք օգտագործել այն Ընդլայնված կոմբինատ տողեր երրորդ մասի հավելյալ գործիքի առանձնահատկություն - Excel- ի համար նախատեսված գործիքներ հեշտությամբ և արագորեն միավորել կրկնօրինակների շարքերը, ապա արժեքներն ամփոփել մեկ այլ սյունակում:

Այն բանից հետո անվճար տեղադրում Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝

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

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

2. Դրանից հետո բացվող երկխոսության մեջ ընտրեք այն սյունակը, որի հիման վրա միաձուլելու եք այլ սյունակները, ապա կտտացրեք Հիմնական Բանալին և կտտացրեք մեկ այլ սյունակի վրա և կտտացրեք Հաշվել Ապա ընտրեք Գումար.

ԱկնարկԵթե ​​ձեր ընտրած տիրույթն ունի վերնագրեր, ստուգեք Իմ տվյալներն ունեն վերնագրերեւ ստուգեք Օգտագործեք ձևաչափված արժեքներ միաձուլումից հետո կպահպանի ձևաչափումը:

doc սյունակները մի սյունակի հիման վրա 6

3. Այնուհետեւ կտտացրեք Ok, Այժմ տվյալները միավորվել են ՝ հիմնվելով առաջնային սյունակի վրա, և մեկ այլն ամփոփվում է: Տեսեք,

doc սյունակները մի սյունակի հիման վրա 7


նետ կապույտ աջ պղպջակ Միաձուլեք տողերը մեկ սյունակի հիման վրա, ապա կատարեք այլ գործողություններ այլ սյունակների վրա `Ընդլայնված կոմբինատ շարքերով:

Ընդլայնված կոմբինատ տողեր հզոր է, քանի որ այն ոչ միայն կարող է միավորել կրկնօրինակ տողերը մեկ սյունակում, ապա գումարել մեկ այլ սյունակ, այլ նաև կարող է միավորել կրկնօրինակ տողերը մեկ սյունակում, ապա կատարել տարբեր գործողություններ այլ սյունակների վրա:

Ենթադրենք, ես ունեմ տվյալների մի շարք, ինչպես ցույց է տրված ստորև նշված էկրանի նկարը, և ես ուզում եմ և՛ միավորել սյունակում B սյունակում, և՛ C սյունակում գումարել արժեքները ՝ հիմնվելով A սյունակի վրա:
doc սյունակները մի սյունակի հիման վրա 8

Այն բանից հետո անվճար տեղադրում Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝

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

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

2. Մեջ Միավորել շարքերը ՝ հիմնվելով սյունակի վրա երկխոսություն, արա՛ այսպիսիներով.

(1) Կտտացրեք այն սյունակին, որի վրա ցանկանում եք միավորել, և կտտացրեք Առաջնային բանալին;

doc սյունակները մի սյունակի հիման վրա 10

(2) Կտտացրեք այն սյունակին, որը ցանկանում եք միավորել տվյալները և կտտացնել Միավորել, ապա ցուցակից ընտրեք Ձեզ անհրաժեշտ մեկ տարանջատիչ.

doc սյունակները մի սյունակի հիման վրա 11

(3) Կտտացրեք այն սյունակին, որը ցանկանում եք ամփոփել արժեքները և կտտացնել Հաշվելեւ ընտրեք Գումար.

doc սյունակները մի սյունակի հիման վրա 12

3: սեղմեք Ok, Այժմ արդյունքը կարող եք տեսնել ստորև.

doc սյունակները մի սյունակի հիման վրա 13

հետ Ընդլայնված կոմբինատ տողեր առանձնահատկությունը, դուք նաև կարող եք միավորել տողերը մեկ սյունակի հիման վրա, ապա հաշվել, միջինացնել, 1-ին կամ վերջին տվյալները պահել այլ սյունակներում: 


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

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

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

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

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (3)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Այ, ձեր մոդուլը նախկինում աշխատում էր նաև մեծ սեղանների համար (օրինակ՝ ցանկանում եք ամփոփել ըստ Տարի, բայց ունեք Վաճառք 1, Վաճառք 2, Վաճառք 3... և այլն): Բայց հիմա այն ստանում է միայն առաջին սյունակը ճիշտ (Վաճառք 1), իսկ մնացած բոլորը ճիշտ չեն ամփոփվում: Ինչ-որ բան փոխե՞լ եք:
Thanks!
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ողջույն, IK, գուցե դուք կարող եք օգտագործել sumproduct ֆունկցիան SUMPRODUCT((A2:A10=”Pen”)*(B2:E10)) դրանք մեկ առ մեկ հաշվարկելու համար: A2:A10 տիրույթն է, որը պարունակում է որոնման արժեքը, գրիչը չափանիշն է, B2:E10 այն միջակայքն է, որը ցանկանում եք գումարել չափանիշի հիման վրա:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ես նույն/նման հարց ունեմ. Ես փորձում եմ ամփոփել հղման բջիջի աջ կողմում գտնվող բոլոր սյունակները, բայց այն ամփոփում է միայն մեկը: Ինչպե՞ս կարող եմ ստանալ այն, որ բոլորն առանձին-առանձին գումարի ճիշտ:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից