Перейти до основного матеріалу

Як об’єднати кілька аркушів з однаковими заголовками в Excel?

Наприклад, у вас є дані з однаковими заголовками на різних аркушах, як показано на скріншотах нижче, і тепер ваша робота - об’єднати ці аркуші в один аркуш. Замість того, щоб копіювати та вставляти їх по одному, цей посібник представляє кращі способи вирішення цієї роботи.

doc поєднує той самий заголовок 1
doc поєднує той самий заголовок 2
doc поєднує той самий заголовок 3

Об’єднайте аркуші з однаковими заголовками VBA

Консолідуйте аркуші Excel з однаковими заголовками за допомогою функції Consolidate

Об’єднайте або консолідуйте аркуші Excel з однаковими заголовками Kutools для Excel гарна ідея3


стрілка синя права міхур Об’єднайте аркуші з однаковими заголовками VBA

Якщо ви просто хочете об’єднати аркуші з однаковими заголовками без будь-яких обчислень, ви можете застосувати код VBA для його вирішення.

1. Активуйте книгу, в яку ви хочете об'єднати аркуші, натисніть Alt + F11 клавіші, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. клацання Insert > Модулі, а потім вставте нижче код 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.) Ваші дані повинні починатися з А1, якщо ні, код не набирає чинності.

(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

Якщо в деяких випадках ви хочете об’єднати дані лише з одними і тими ж заголовками, а в інших випадках ви хочете об’єднати дані та об’єднати їх, чи є якісь хитрощі, здатні вирішити обидві ці завдання? Тут я представляю Kutools для Excelпотужний Поєднувати функція для вас.

Об’єднайте аркуші Excel з однаковими заголовками

Об’єднайте кілька аркушів з однаковими заголовками

Kutools для Excel, з більш ніж 300 зручні функції, полегшує вам роботу. 

після установки Kutools для 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

Об’єднайте кілька аркушів з однаковими заголовками

після установки Kutools для Excel, виконайте наведені нижче дії.(Безкоштовно завантажте Kutools для Excel зараз!)

1. клацання підприємство > Поєднувати , щоб відобразити майстер комбінування та перевірити Об’єднайте та обчисліть значення в кількох книгах на одному аркуші. Дивіться знімок екрана:
doc kutools поєднують 5

2. клацання Далі>> йти до Об’єднайте робочі аркуші - Крок 2 з 3 майстра та виконайте вказані нижче дії.

doc kutools поєднують 3
1) Клацніть додавати > Папка з файлами щоб додати книги, з яких можна об’єднати аркуші, у Список робочих книжок;
2) Перевірте назву книги, яку ви хочете об’єднати, ви можете вибрати кілька книг;
3) Перевірте аркуші, які ви хочете об’єднати разом;
4) Клацніть вибрати документ щоб вибрати діапазон, який потрібно об'єднати, якщо діапазони розміщені в одному і тому ж місці кожного аркуша, просто потрібно вибрати один діапазон з аркуша, а потім клацнути Той же діапазон.

3. Перейдіть на клацання Далі>>, і виберіть функцію, яку потрібно застосувати у об’єднаному діапазоні, і перевірте мітки для об’єднаного діапазону. Дивіться знімок екрана:
doc kutools поєднують 6

4. клацання обробка, і з’явиться діалогове вікно із запитом зберегти сценарій, натисніть Так щоб зберегти, або натисніть Немає щоб не зберегти його.

Потім діапазони консолідуються в новій книзі.

doc поєднує той самий заголовок 12

Перевага Kutools для ExcelАвтора Поєднувати Ця функція полягає в тому, що ви можете об'єднати кілька аркушів у відкритих книгах або невідкритих книгах в один аркуш або одну книгу.

Легко комбінувати / консолідувати дані на основі того самого значення в Excel

Припустимо, ви працюєте з робочим аркушем, який містить кілька повторюваних записів, і тепер вам потрібно об’єднати / об’єднати рядки на основі одного і того ж значення та зробити деякі обчислення, такі як сума, середнє, підрахунок повторюваних рядків. З цим Розширені комбіновані ряди of Kutools для Excel, Ви можете швидко об'єднати однакові значення / однакові дані або повторити рядки у відповідні комірки.  Натисніть, щоб отримати повнофункціональну безкоштовну пробну версію через 30 днів!
doc розширені комбіновані рядки
 
Kutools для Excel: із понад 300 зручними надбудовами Excel, які можна безкоштовно спробувати без обмежень протягом 30 днів.

Відносні статті

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, 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