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

Ինչպե՞ս Excel- ում միաձուլել բազմաթիվ էջեր նույն վերնագրերով:

Օրինակ, դուք ունեք միևնույն վերնագիր ունեցող որոշ տվյալներ տարբեր թերթերում, ինչպես ցույց է տրված ներքևում նշված սքրինշոթերը, և այժմ ձեր գործն է այդ թերթերը միաձուլել մեկ թերթիկի մեջ: Փոխանակ պատճենելու և դրանք մեկ առ մեկ տեղադրելու, այս ձեռնարկը ներկայացնում է ձեզ այս գործը կարգավորելու ավելի լավ եղանակները:

doc միավորել նույն վերնագիրը 1
doc միավորել նույն վերնագիրը 2
doc միավորել նույն վերնագիրը 3

Միաձուլեք թերթերը նույն վերնագրերով VBA- ի կողմից

Excel- ի թերթերը միևնույն վերնագրերով համախմբել ըստ Consolidate գործառույթի

Excel- ի համար Kutools- ի կողմից Excel- ի թերթերը միաձուլեք կամ համախմբեք նույն վերնագրերով լավ գաղափար 3


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

Եթե ​​պարզապես ուզում եք թերթերը միևնույն վերնագրերով միաձուլել առանց որևէ հաշվարկի, ապա այն լուծելու համար կարող եք կիրառել VBA կոդ:

1. Ակտիվացրեք աշխատանքային գիրքը, որը ցանկանում եք միավորել թերթերը, սեղմել Alt + F11 բացելու ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

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

VBA. Միաձուլեք թերթերը նույն վերնագրերով

Sub Combine()
'UpdateByKutools20151029
    Dim i As Integer
    Dim xTCount As Variant
    Dim xWs As Worksheet
    On Error Resume Next
LInput:
    xTCount = Application.InputBox("The number of title rows", "", "1")
    If TypeName(xTCount) = "Boolean" Then Exit Sub
    If Not IsNumeric(xTCount) Then
        MsgBox "Only can enter number", , "Kutools for Excel"
        GoTo LInput
    End If
    Set xWs = ActiveWorkbook.Worksheets.Add(Sheets(1))
    xWs.Name = "Combined"
    Worksheets(2).Range("A1").EntireRow.Copy Destination:=xWs.Range("A1")
    For i = 2 To Worksheets.Count
        Worksheets(i).Range("A1").CurrentRegion.Offset(CInt(xTCount), 0).Copy _
               Destination:=xWs.Cells(xWs.UsedRange.Cells(xWs.UsedRange.Count).Row + 1, 1)
    Next
End Sub

3. Մամուլ F5 VBA գործարկելու համար ստեղն է, և երկխոսություն է դուրս գալիս, որպեսզի մուտքագրեք վերնագրի տողերի քանակը: Տեսեք,

doc միավորել նույն վերնագիրը 4

4: սեղմեք OK, Եվ ակտիվ աշխատանքային գրքի բոլոր թերթերը միաձուլվում են նոր թերթում, որը կոչվում է «Համակցված».

doc միավորել նույն վերնագիրը 1
doc գումարած
doc միավորել նույն վերնագիրը 2
doc գումարած
doc միավորել նույն վերնագիրը 3
doc ուղղահայաց հավասար
doc միավորել նույն վերնագիրը 3

Ձեր պատասխանը ուղարկված չէ:

(1.) Ձեր տվյալները պետք է սկսվեն A1- ից, եթե ոչ, ապա կոդը չի գործի:

(2.) Ձեր տվյալները պետք է ունենան նույն կառուցվածքը:

(3.) Այս կոդը կարող է միավորել միայն ակտիվ աշխատանքային գրքի բոլոր աշխատանքային թերթերը, եթե ցանկանում եք միացնել աշխատանքային թերթերը բազմաթիվ աշխատանքային գրքերից, այս կոդը չի գործի:


նետ կապույտ աջ պղպջակ Excel- ի թերթերը միևնույն վերնագրերով համախմբել ըստ Consolidate գործառույթի

Ենթադրելով, որ դուք ունեք որոշ տվյալներ նույն սյունակի և շարքի վերնագրերով, ինչպես ցույց է տրված ստորև նշված էկրանի նկարը, և ցանկանում եք միավորել Excel թերթերը նույն վերնագրերով, ապա կատարել որոշ հաշվարկներ, Դուք կարող եք կիրառել «Համախմբել» գործառույթը Excel- ում:

doc միավորել նույն վերնագիրը 6
doc միավորել նույն վերնագիրը 7
doc միավորել նույն վերնագիրը 8

1. Բացեք բոլոր աշխատանքային գրքերը, որոնցից ուզում եք թերթերը միաձուլել, և ցուցիչը դնել դատարկ խցի մոտ, որտեղ ցանկանում եք գտնել միաձուլման տվյալները, ապա կտտացրեք Ամսաթիվ > Համախմբել, Տեսեք,

doc միավորել նույն վերնագիրը 9

2. Հետո Համախմբել պատուհանը, արեք, ինչպես ստորև է նշված գործողությունը.

1) Ընտրեք այն հաշվարկը, որը ցանկանում եք ֆունկցիա ցուցակ;

2) Կտտացրեք ընտրելու համար այն տիրույթը, որը ցանկանում եք միավորել:

3) Կտտացրեք Ավելացնել կոճակը ՝ ընդգրկույթը բոլոր տեղեկատուների ցուցակում ավելացնելու համար: Կրկնել 2) քայլ և 3) քայլեր `այս ցուցակում միանալու համար անհրաժեշտ բոլոր միջակայքերը ավելացնելու համար:

4) ստուգեք Վերին շարքը և Ձախ սյունակ տակ Օգտագործեք պիտակները ներսից բաժնում:

5) Եթե ցանկանում եք միացված տվյալները կապել աղբյուրի տվյալների հետ, ստուգեք Հղումներ ստեղծել աղբյուրի տվյալների վրա.

doc միավորել նույն վերնագիրը 10
doc միավորել նույն վերնագիրը 11
1) Ընտրեք այն հաշվարկը, որը ցանկանում եք ֆունկցիա ցուցակ;

2) Կտտացրեք ընտրելու համար այն տիրույթը, որը ցանկանում եք միավորել:

3) Կտտացրեք Ավելացնել կոճակը ՝ ընդգրկույթը բոլոր տեղեկատուների ցուցակում ավելացնելու համար: Կրկնել 2) քայլ և 3) քայլեր `այս ցուցակում միանալու համար անհրաժեշտ բոլոր միջակայքերը ավելացնելու համար:

4) ստուգեք Վերին շարքը և Ձախ սյունակ տակ Օգտագործեք պիտակները ներսից բաժնում:

5) Եթե ցանկանում եք միացված տվյալները կապել աղբյուրի տվյալների հետ, ստուգեք Հղումներ ստեղծել աղբյուրի տվյալների վրա.

3: սեղմեք OK, Այժմ նույն վերնագրերով տվյալների ամբողջ տիրույթը միավորվում է մեկի մեջ և ամփոփվում է վերնագրերի միջոցով:

doc միավորել նույն վերնագիրը 6doc միավորել նույն վերնագիրը 7doc միավորել նույն վերնագիրը 8
doc ուղղահայաց հավասար
doc միավորել նույն վերնագիրը 12

նետ կապույտ աջ պղպջակ Excel- ի համար Kutools- ի կողմից Excel- ի թերթերը միաձուլեք կամ համախմբեք նույն վերնագրերով

Եթե ​​որոշ դեպքերում ցանկանում եք միավորել տվյալները միայն միևնույն վերնագրերով, իսկ այլ դեպքերում ՝ միաձուլել տվյալները և համախմբել դրանք, կա՞ն որևէ հնարքներ այս երկու խնդիրները լուծել: Այստեղ ես ներկայացնում եմ Excel- ի համար նախատեսված գործիքներհզոր է Միավորել գործառույթ ձեզ համար:

Միացրեք Excel թերթերը նույն վերնագրերով

Միավորել միևնույն վերնագրերով մի քանի թերթ

Excel- ի համար նախատեսված գործիքներ, ավելի քան 300 հարմար գործառույթներ, ավելի հեշտացնում է ձեր գործերը: 

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝(Անվճար ներբեռնեք Kutools- ի համար Excel- ը հիմա!)

Միացրեք Excel թերթերը նույն վերնագրերով

1: սեղմեք Kutools Plus > Միավորել միացնել կախարդի կախարդին, ապա ստուգել Միացրեք աշխատանքային գրքերից բազմաթիվ աշխատանքային թերթեր մեկ աշխատանքային թերթի մեջ, Տեսեք սքրինշոթերը.
doc միավորել նույն վերնագիրը 14
doc kutools- ը համատեղում է 2

2: սեղմեք Հաջորդ>> գնալ Միավորել աշխատանքային թերթերը - 2-րդ քայլ 3 կախարդ և արեք ինչպես ստորև ՝

doc kutools- ը համատեղում է 3
1) Կտտացրեք Ավելացնել > Ֆայլի թղթապանակը աշխատանքային գրքույկներն ավելացնելու համար, որոնցից կարող եք թերթերը միացնել Աշխատանքային տետրերի ցուցակ;
2) ստուգեք աշխատանքային գրքի անունը, որը ցանկանում եք միավորել թերթերը, կարող եք ընտրել բազմաթիվ աշխատանքային գրքեր.
3) ստուգեք այն թերթերը, որոնք ցանկանում եք համատեղել միասին.
4) Կտտացրեք փաստաթղթի ընտրություն ընտրելու համար այն տիրույթը, որը ցանկանում եք համատեղել, եթե միջակայքերը տեղադրված են յուրաքանչյուր թերթի նույն տեղում, պարզապես անհրաժեշտ է թերթից ընտրել մեկ տիրույթ, ապա կտտացնել Նույն տիրույթը.

3: սեղմեք Հաջորդ >> դեպի Միավորել աշխատանքային թերթը - 3-րդ քայլ 3 կախարդ, և ստուգեք Միավորել ըստ շարքի ընտրանքի եւ տեսակը 1 մեջ տեքստային տուփի մեջ Վերնագրի շարքի համարը, եթե ձեր տիրույթում վերնագիր չկա, մուտքագրեք 0:

doc kutools- ը համատեղում է 4

4: սեղմեք Ավարտել, և դուրս կգա երկխոսություն ՝ այս սցենարը պահելու համար ձեզ հիշեցնելու համար, եթե ուզում եք այն պահպանել, կտտացրեք այոԿամ Ոչ.

doc միավորել նույն վերնագիրը 17

Այժմ թերթերը միաձուլվում են նույն աշխատանքային տողի վերնագրերի հետ նոր աշխատանքային գրքում:

doc միավորել նույն վերնագիրը 18

Միավորել միևնույն վերնագրերով մի քանի թերթ

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝(Անվճար ներբեռնեք Kutools- ի համար Excel- ը հիմա!)

1: սեղմեք ձեռնարկություն > Միավորել ցուցադրել Combine wizard- ը և ստուգել Համախմբել և հաշվարկել արժեքները բազմաթիվ աշխատանքային գրքերի մեջ մեկ աշխատանքային թերթի մեջ, Տեսեք,
doc kutools- ը համատեղում է 5

2: սեղմեք Հաջորդ>> գնալու համար Միավորել աշխատանքային թերթերը - 2-րդ քայլ 3 կախարդ և արեք ինչպես ստորև ՝

doc kutools- ը համատեղում է 3
1) Կտտացրեք Ավելացնել > Ֆայլի թղթապանակը աշխատանքային գրքույկներն ավելացնելու համար, որոնցից կարող եք թերթերը միացնել Աշխատանքային տետրերի ցուցակ;
2) ստուգեք աշխատանքային գրքի անունը, որը ցանկանում եք միավորել թերթերը, կարող եք ընտրել բազմաթիվ աշխատանքային գրքեր.
3) ստուգեք այն թերթերը, որոնք ցանկանում եք համատեղել միասին.
4) Կտտացրեք փաստաթղթի ընտրություն ընտրելու համար այն տիրույթը, որը ցանկանում եք համատեղել, եթե միջակայքերը տեղադրված են յուրաքանչյուր թերթի նույն տեղում, պարզապես անհրաժեշտ է թերթից ընտրել մեկ տիրույթ, ապա կտտացնել Նույն տիրույթը.

3. Անցեք կտտացնելով Հաջորդ>>, և ընտրեք գործառույթը, որը ցանկանում եք կիրառել միավորված տիրույթում, և ստուգեք պիտակները ձեր միավորված տիրույթի համար: Տեսեք,
doc kutools- ը համատեղում է 6

4: սեղմեք Ավարտել, և դուրս կգա երկխոսություն ՝ սցենարը փրկելու խնդրանքով, կտտացրեք այո փրկելու համար կամ կտտացրեք Ոչ այն չփրկելու համար:

Այնուհետեւ միջակայքերը համախմբվում են նոր աշխատանքային գրքում:

doc միավորել նույն վերնագիրը 12

Առավելությունն Excel- ի համար նախատեսված գործիքներ'S Միավորել գործառույթն այն է, որ դուք կարող եք միացնել մի քանի թերթ բացված աշխատանքային գրքերի կամ չբացված աշխատանքային գրքերի մեկ աշխատանքային թերթի կամ մեկ աշխատանքային գրքի մեջ:

Excel- ում նույն արժեքի հիման վրա հեշտությամբ համատեղեք / համախմբեք տվյալները

Ենթադրելով, որ դուք աշխատում եք մի աշխատաթերթի հետ, որը պարունակում է բազմաթիվ կրկնօրինակ գրառումներ, և այժմ դուք պետք է միավորեք / միաձուլեք տողերը նույն արժեքի հիման վրա և կատարեք որոշ հաշվարկներ, ինչպիսիք են կրկնօրինակ տողերի գումարը, միջինը, Սրանով Ընդլայնված կոմբինատ տողեր of Excel- ի համար նախատեսված գործիքներ, Դուք կարող եք արագորեն միավորել նույն արժեքները / նույն տվյալները կամ կրկնօրինակ տողերը համապատասխան բջիջների մեջ:  Կտտացրեք 30 օրվա ընթացքում լիարժեք անվճար փորձարկման համար:
doc առաջադեմ կոմբինատ տողեր
 
Excel- ի համար նախատեսված գործիքներ. Ավելի քան 300 հարմար Excel հավելվածներով, 30 օրում առանց սահմանափակումների անվճար փորձեք:

Հարաբերական հոդվածներ

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

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

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

Նկարագրություն


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

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
Comments (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
When using the VBA code only two of my sheets are combining instead of the three active sheets. The headers are all the same and all start in cell A1. Would you have any idea what the issue is please?
This comment was minimized by the moderator on the site
Bonjour, est-ce possible de Fusionner et LIER Plusieurs Feuilles Avec Les Mêmes En-Têtes Dans Excel afin que les changements qui sont effectués dans les feuilles du classeur soient appliqués dans la nouvelle feuille "combinée"?
This comment was minimized by the moderator on the site
Hello, If you want to combine sheets which with the same sheet names, there is no built-in feature in Excel can help you. You can try Combine feature of Kutools for Excel, it provides an option that combine sheets with same names, for more details, you can visit this tutorial https://www.extendoffice.com/product/kutools-for-excel/excel-combine-sheets-of-same-name-into-one-worksheet.html. And Kutools for Excel supports 30-day free trial, you can download it to have a try. https://www.extendoffice.com/download/kutools-for-excel.html
This comment was minimized by the moderator on the site
Very helpful the code for combining multiple worksheets, it worked fine! Thank you!
This comment was minimized by the moderator on the site
what will be vba code for combining multiple sheets in workbook into one worksheet if row headers are the same ( not column headers)
This comment was minimized by the moderator on the site
I used VBA to copy all sheets to one, but how can I copy only select sheets instead of all of them?
This comment was minimized by the moderator on the site
Esta excelente la primera macro, pero no sabrias decirme por que solamente me combina 4 columnas?. Si mis hojas tienen un aproximado de 30 columnas.
This comment was minimized by the moderator on the site
Hello
I bought Kutools for Excel 19.00, by interest in the merge function, but doesn't work with my files and sheets, all have the same name (Workbook an sheets) but in the combination of : "Combine all same name worksheets into one worksheet" dosn't work (does nothing), inclusive don't saves the new workbook in the place that I select prior to execute de Finish button.
I followed the instructions one and another time, but the result is the same.
Some help?
This comment was minimized by the moderator on the site
Hi, Ezequiel Zavaleta, I am sorry for hear that. You can contact our Customer Service Manager through this: our team will solve your problems as soon as possible.
This comment was minimized by the moderator on the site
perfect, thank you
This comment was minimized by the moderator on the site
How can I combine only sheets with same header ignoring other sheets?
This comment was minimized by the moderator on the site
How do I merge only select worksheets in that workbook?
How can I run the Macro to refresh the data on a weekly basis without having to delete the "Combined" tab?
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations