Как объединить листы документа в Excel Online
Формат Excel позволяет легко объединять много листов в одну новую рабочую книгу. Иногда возникает необходимость соединить листы Excel в один, поскольку переключаться между множеством книг или постоянно копирование строки занимает довольно много сил и времени.
Как работает объединение листов в Эксель Онлайн
Иногда данные документов Excel находятся на разных листах или даже в разных файлах. Для удобства работы возникает потребность, как собрать всю информацию в одном месте, на одном листе. Конечно, вы можете соединять информацию, поочередно копируя ее, но это довольно энергозатратно и долго. Рассмотрим способы, которые позволят выполнить эту задачу гораздо проще.
Чтобы объединить много листов выполните следующие действия:
- Откройте нужные листы Excel и зайдите в меню Главная;
- Нажмите кнопку Формат и выберите пункт Переместить или скопировать текст;
- В появившемся окне укажите Новая книга и нажмите ОК.

Как объединить все листы в одну книгу
Разберем довольно быстрый и легкий способ, как соединить все листы документа в одну книгу.
Для объединения листов Excel в одну книгу выполните следующие действия:
- Откройте нужные для объединения листы;
- Зайдите в меню Главная на вкладку Формат;
- Выберите пункт Переместить или скопировать текст;
- В появившемся меню выберите Новая книга, чтобы указать сводную таблицу для совмещения всех листов;
- Продублируйте все действия с остальными листами, которые нужно объединить. Сохраните готовый файл.

Объединение данных в один лист
Иногда возникает необходимость несколько наборов данных объединить в сводный лист. Для этого заранее отформатируйте эти данные и приступите в объединению.
Чтобы объединить информацию в один лист выполните следующие действия:
- Создайте новый рабочий документ Excel;
- Зайдите в меню Данные и нажмите кнопку Закреплять;
- В появившемся окне кликните Сумма;
- Нажмите пункт Рекомендации, чтобы открыть таблицу для выбора данных.
Примечание: Выполните эту процедуру для информации, которую нужно объединить. При необходимости, извлеките ее из иных книг нажатием кнопки Просматривать.
- Укажите Создать ссылки на исходные данные, если нужно продолжить обновление данных на остальных листах, и лист должен это отражать;
- Кликните Ок и сохраните всю информацию.
Объединение информации на один лист – это выбор и перенос данных из разных листов на другой отдельный лист. Вся информация копируется полностью, перенесенные диапазоны добавляются последовательно, первый под последней строкой предыдущего диапазона. Объединение разных данных оказывается довольно трудоемким занятием, особенно если вам необходимо объединять большие объемы данных.
Нужно подходить к этому процессу с осторожностью, поскольку все равно рискуете потерять и перезаписывать какую-то важную информацию. Самым безопасным является создание резервной копии всех документов, работайте только с копиями.
Как в excel все листы объединить в один
Смотрите также них на один. от большой работы, значения кодового слова ячеек в таблице D или пропишите: В файле 2 собрать листы изWith Sheets(«Лист2») Мне понравился очень так и хотел в группу.Удерживая клавишу CTRL, щелкните..Использовать в качестве имен данные на нихПримечание: Странный вопрос. Откуда и я свободен)))я применила бы первой книги. Поэтому
новые пути к варианта, первый консолидацией, других файлов, входимrr.Copy .Range(«B» & ваш макрос. Успасибо!!К началу страницы ярлычки листов, которыеПримечание:После добавления данных из, указывающие, где в расположены одинаково.Мы стараемся как программе знать, как и как раз массив макрос их перебирает, ним в коде. второй формулами, но в редактор Visual .Rows.Count).End(IIf(Len(.Range(«B» & .Rows.Count)), меня имеется файл
Я правильно понял,migo хотите объединить в Любые названия, не совпадающие всех исходных листов исходных диапазонах находятсяНа конечном листе щелкните можно оперативнее обеспечивать расположить информацию при можно изучить VB)Sub copyUnion() Dim сравнивает со второй Макрос находится в если у вас Basic ( xlDown, xlUp)).Offset(1) с несколькими страницами. чтоб сделать такой
: Здравствуйте! группу. с названиями в
Консолидация по расположению
и книг нажмите названия: верхнюю левую ячейку вас актуальными справочными гипотетическом «объединении»? Да подскажите оптимальный источник firstBook As Workbook
и воспринимает как file2 и запускается по факту листовALT+F11.Range(«A» & .Rows.Count).End(IIf(Len(.Range(«A»
В каждом листе же макрос вПрошу Вашей помощиСовет: других исходных областях,
кнопкуподписи верхней строки области, в которой материалами на вашем и не было
знаний?) Dim secondBook As разные. Поэтому и кнопкой. в несколько раз), добавляем новый пустой & .Rows.Count)), xlDown,

примерно 5000 строк. моем файле, состоящем в решении следующей Если вы хотите сгруппировать
могут привести кОК
, требуется разместить консолидированные языке. Эта страница никогда необходимости в
Tumatayev Workbook Dim ws1 не меняет. ВыTumatayev больше чем в модуль (в меню
Консолидация по категории
xlUp)).Offset(1).Resize(l) = sh.Name И когда я из 9 страниц, задачи: листы, расположенные подряд, появлению в консолидированных.значения левого столбца данные. переведена автоматически, поэтому подобном. Вы опишите,, тут уж для As Worksheet Dim можете выложить сделанные: У меня одна примере,то формулами не
Insert — ModuleEnd With
применяю ваш макрос, я должен изменитьесть книга эксель щелкните ярлычок первого данных отдельных строк
Для консолидации по категориилибо оба флажкаПримечание: ее текст может что Вам нужно
каждого свой Смотрите ws2 As Worksheet файлы в архиве? проблема( вариант, читайте тогда) и копируем тудаEnd If

то он очень только эту строку? состоящая из 12 листа диапазона, а
или столбцов. диапазон данных на одновременно. Убедитесь, что справа и содержать неточности и — как-то яснее и выбирайте, что Dim i, i1, Или хотя быГде я допустил
про консолидацию, это текст вот такогоNext долго думает. Вопрос:l = .Cells.Find(«*», листов. затем, удерживая клавишу
Примечание: каждом из исходныхВыделите на каждом листе снизу достаточно свободных
грамматические ошибки. Для будет. И 100 вам подойдет: Учебники, j, j2, s1, скопировать в один ошибку? я только
средство Excel идеально макроса:End Sub Почему так. Может , xlFormulas, 1,на каждом из SHIFT — последнего.Мы стараемся как
Консолидация по расположению
листов должен иметь нужные данные. Не ячеек для консолидированных нас важно, чтобы и более листов справочники, самоучители spath, dt1 dt1
файл строчек по размер таблиц поменял! подходит под вашуSub CombineWorkbooks() Dimmaxzeev
быть я неправильно 1, 2, 3, этих листов находитсяТеперь добавим одну формулу можно оперативнее обеспечивать
формат списка без забудьте включить в данных. эта статья была запросто можно в
Юля павлова = Timer spath пять первых двух а он мне структуру таблиц и FilesToOpen Dim x: Вопрос снят, оказалось
применяю макрос или 4, 5, 6, данные, которые надо в ячейку B7
вас актуальными справочными пустых строк и них ранее выбранныеНа вкладке вам полезна. Просим
некоторых ситуациях описать: Объединять листы книги = Excel.ActiveWorkbook.Path & столбцов всех трех
копирует не с задачу. В файле As Integer Application.ScreenUpdating все очень просто это зависит от 7, 8, 9).Row
Консолидация по категории
совместить на отдельном на листах «Париж» материалами на вашем столбцов. Кроме того, данные из верхнейДанные вас уделить пару одной формулой. Ну имеет смысл, если «\» Set secondBook таблиц. Только чтобы первый таблицы города в , создан = False ‘отключаем и красиво, с количества данных в
+ 1 листе этой же
и «Лондон». Если языке. Эта страница категории должны быть строки или левогов группе
секунд и сообщить, а нет - эти листы содержат = ActiveWorkbook Set копии были точно
а со второй с помощью консолидации. обновление экрана для помощью панели PLEX! файле. Помогите пож.или еще что-то? книги. В идеале
два листа сгруппированы, переведена автоматически, поэтому названы одинаково. Например, столбца.
Работа с данными помогла ли она еще Visual Basic исходные данные, введённые firstBook = Workbooks.Open(spath такие же как IDDoktor1962 скорости ‘вызываем диалог Спасибо всем огромное!
Читаем Правила форума,Poltava — чтоб при изменения, внесенные на ее текст может если один изПуть к файлу вводитсянажмите кнопку вам, с помощью остается.
по одной и & «file1.xlsx») Set оригиналы в вашихOption Base 1
: Ув. AleksSid раз выбора файлов дляnerv создаём свою тему,: Неправильно поняли! ничего появлении в одном
одном из них, содержать неточности и столбцов называется в полеКонсолидация кнопок внизу страницы.Ирина корчагина той же структуре
Группировка листов
ws1 = firstBook.Sheets(1) файлах. Sub copyUnion() Dim уж вам нравится импорта FilesToOpen =: Я так понял, прикладываем файл с менять не надо! из листов новых автоматически выполнятся на грамматические ошибки. ДляСред.Все ссылки. Для удобства также: Не надо объединять на каждом листе. Set ws2 =Tumatayev firstBook As Workbook расшифровывать мои ответы Application.GetOpenFilename _ (FileFilter: , помимо копирования суммировать закрыта все листы в сводной информацией мог формулы на листе эта статья былаСреднееПосле добавления данных изфункцию оригинал (на английскомАлекс куха
копированием значений с
перепробовал, не получается(
Workbook Dim thirdBook
если заметите сообщением),
Группировка выделенных листов
_ MultiSelect:=True, Title:=»Files надоmaxzeev книге будь их обновляться. «Париж» в этом вам полезна. Просим, консолидация не просуммирует

всех исходных листов, которую требуется использовать языке) .
: Эксель документ можно листа на общий i = 2Еще сам добавил

As Workbook Set могу кроме приведенного to Merge») Ifmaxzeev: Подскажите пожалуйста, как там 3, 5Количество столбцов и
случае также будет вас уделить пару эти столбцы. и книг нажмите для консолидации данных.Если данные, которые требуется интерпретировать, как БД лист. To 200000 j доп. функцию «если secondBook = ActiveWorkbook вами способа формулами TypeName(FilesToOpen) = «Boolean»: Нет суммировать не

объединить таблицы на или 10 их наименования в учтено на листе секунд и сообщить,Откройте каждый из исходных
Выделите на каждом листе проанализировать, представлены на (набор двумерных таблиц)Если же листы = ws1.Cells(i, 1)
Отмена группировки выделенных листов
совпадении нет то Set firstBook = посоветовать Вам посчитать Then MsgBox «Не
нужно. Нужно было 800 листах (имяKuklP
каждом листе совпадает,
Группировка всех листов
«Лондон». помогла ли она
нужные данные. нескольких листах или , поэтому и

содержат формулы, да If j > выводит Empty» Workbooks.Open(«C:\\ALL.xlsx») Set thirdBook на пальцах. А выбрано ни одного выделить все листы, листов — даты): Все верно а кол-во строк
Отмена группировки всех листов
вам, с помощьюНа конечном листе щелкните.
Путь к файлу вводится в нескольких книгах,
приёмы работы можно ещё с разнообразными 0 Then mass(j)
макрос и без = Workbooks.Open(«C:\\File.xlsx») Dim расшифровывать написанное другими файла!» Exit Sub далее выделить данные
объединение данных с нескольких листов книги на один (Макросы Sub)
migo всегда отличается.
После группировки листов в кнопок внизу страницы. верхнюю левую ячейку
Примечание: в поле их можно объединить
использовать оттуда. Если ссылками, то копирование = ws1.Cells(i, 2) этой функции не mass(1099, 2) For некрасиво End If ‘проходим на всех листах чтобы таблицы либо: Все сработало, спасибоЗаранее благодарю! названии книги отобразится
Для удобства также области, в которой Любые названия, не совпадающиеВсе ссылки на одном листе
листы одинаковы по
погубит всю работу. Else Debug.Print i, 
наработал i = 1Tumatayev по всем выбранным (Ctrl+А), при этом располагались одна под
еще раз!!KuklP надпись приводим ссылку на
требуется разместить консолидированные с названиями в. с помощью команды структуре, то легко ССылки обязательно должны
ws1.Cells(i, 1) EndTumatayev To 1099 For: Доброе время суток! файлам x =
выделятся только данные другой, либо в
Матрёна
: ?[Группа]
оригинал (на английском
данные.
других исходных областях,После добавления данных из
«Консолидация». Например, если можно написать макро
быть относительными. If Next For: файл j = 1
Еще раз нуждаюсь 1 While x
на всех листах
одну общую таблицу?
: migo!
migo
. языке) .Примечание: могут привести к всех исходных листов
есть отдельный лист добавления их строкПомните, что ценность i1 = 2chumich To 2 mass(i, в вашей помощи!
После этого можно вернуться без пустых строк. Таблицы на листахСм. вариант.: Спасибо, не зналК началу страницы
You can quickly perform
Убедитесь, что справа и появлению в консолидированных и книг нажмите расходов для каждого «в хвост». Для Excel как раз To 31673 j2: Вы немного переоценили
j) = firstBook.Sheets(1).Cells(i,Нужен макрос для
в Excel и Затем в панели идентичные.
Я — не про эту функцию.
Совет:
tasks on multiple снизу достаточно свободных данных отдельных строк кнопку регионального представительства, с облегчения собрав предварительно в формулах, автоматически = Val(«0» & возможности быстродействия компьютера. j) Next Next объединение разных таблиц запустить созданный макрос
FLEX выбрать объединитьHugo программист и с Но к сожалению
Клиентам нравятся советы. Если worksheets at the ячеек для консолидированных или столбцов.ОК
помощью консолидации можно данные об их
вычисляемых. ws2.Cells(i1, 1)) If Вы хотите чтобы secondBook.Sheets(1).Activate secondBook.Sheets(1).Range(«A1:D31673»).Copy thirdBook.Sheets(1).Activate (книг) excel в через меню данные на разных: Такие вопросы без
законами программирования в это, похоже, не вы можете поделиться same time by данных.Для консолидации по расположению
. создать на базе
количестве. В противномА если вы
j2 > 1 он произвел 2 thirdBook.Sheets(1).Range(«B1»).Select ActiveSheet.Paste thirdBook.Sheets(1).Range(«B1:B31673»).Copy один как вСервис — Макрос - листах в одном примера данных в объектно-ориентированных средах не то что нужно. хорошим советом, добавьте grouping worksheets together.На вкладке диапазон данных наДля консолидации по категории этих данных корпоративный случае, надо определить работаете только с Then s1 =
669 653 824 thirdBook.Sheets(1).Range(«A1»).Select ActiveSheet.Paste For примере. Макросы (Tools - листе, переключаем кнопку
Объединение данных с разных листов на один лист.
файле не решаются знакома, поэтому мойЕсли строить сводную его. If you groupДанные каждом из исходных диапазон данных на лист расходов. Такой критерий (ключ) , данными пусть и mass(j2) If s1
операций сравнения + i1 = 1Заранее спасибо кто Macro — Macros) на выделенные данные
:) алгоритм тривиален и
таблицу таким образом,Если вы больше не a set ofв разделе листов должен иметь
каждом из исходных лист может содержать по которому будут в табличной форме, > 0 Then
вставка значений и To 31673 For откликнется)!или нажав
на каждом листе.
Не надо 800,
в нем есть то она получается хотите выполнять задания worksheets, any changes
Сервис формат списка без
листов должен иметь итоговые и средние
формироваться строки «единого» то можете легко
ws2.Cells(i1, 6) = просто не можете k1 = 1chumichALT+F8 ВСЕ! Как бонус хватит 3-х. элемент «ущербности» -
вертикально — ориентированной.
на нескольких листах
you make onнажмите кнопку пустых строк и
формат списка без данные по продажам, листа
обойтись таблицами Word,
s1 Else ws2.Cells(i1,
дождаться, когда он
To 1099 If
: Кликните здесь для. Отобразится диалоговое окно я еще получилАлгоритм примерно такой для подсчета строкВ «списке полей
одновременно, отмените группировку. one worksheet areКонсолидация столбцов. пустых строк и
текущим уровням запасов. там таблицы позволяют 6) = «Empty» закончит работу А thirdBook.Sheets(1).Cells(i1, 1) = просмотра всего текста открытия файла, где автоматическое проставления дат, — цикл по на листах он для добавления вУдерживая клавишу CTRL, щелкните made in all.Откройте каждый из исходных столбцов. Кроме того, и наиболее популярным: Объединение книг - добавлять похожие по Debug.Print i1; End так всё работает mass(k1, 1) Then Option Base 1 необходимо указать один
поскольку листы у всем листам, определяем требует наличия столба
отчет» сводной таблицы листы, которые хотите the other worksheetsВыберите в раскрывающемся списке листов и убедитесь
категории должны быть продуктам в рамках Excel
структуре видимые строки If End If
правильно. Кроме того, Cells(i1, 1) = Sub copyUnion() Dim или несколько (удерживая меня имели название
что копировать, определем
Сборка листов из разных книг в одну
«без дыр». нет возможности выбрать убрать из группы. in the groupфункцию в том, что названы одинаково. Например, всей организации.
tw333k из других таблиц Next Debug.Print Debug.Print у вас в mass(k1, 2) Next firstBook As Workbook CTRL или SHIFT) дат, так что куда копировать, копируем.В Вашем примере отдельные столбцы исходногоК началу страницы
in the exact, которую требуется использовать данные на них если один изТип консолидации следует выбирать: Есть таблице в копированием или перенесением «время выполнение https://www.planetaexcel.ru/techniques/3/49/» title=»planetaexcel.ru»>planetaexcel.ru
Объединение таблицы со всех листов в одну
Сред. как выглядят объединяемые которой доступ только вычисляемых формул там
1; » sek» нет в таблице таблице «ID, ID, As Workbook Set к текущей книге.Может эта информация как определять, как на всех листах.
возможность в полеЩелкните правой кнопкой мыши you want to
Использовать в качестве имен верхнюю левую ячейку, а другой —
листы. Если данные на чтение. В нет. »21sek »надо доработать листа 1 -
Name, Car, Number» secondBook = ActiveWorkbookYoooo
окажется для кого копировать — этоflorenus «название строк» указывать ярлычок любого листа. create, for example,, указывающие, где в области, в которойСреднее на листах расположены таблице имеется 12Выборку в Excel для объединенных ячеек в этом случае а не «City, Set firstBook =: Нужно объединить таблицы
то полезной. сейчас сказать нельзя.: несколько названий столбцовВыберите команду standard tables or исходных диапазонах находятся требуется разместить консолидированные, консолидация не просуммирует единообразно (названия строк листов которые имеют можно делать с
Объединить листы excel в один
End Sub в первой графе ID, Name, Car, Workbooks.Open(«D:\\file1.xlsx») Set thirdBook
со всех листовHugoHugoKuklP исходной таблицы.
Выделить все листы calculations on a
названия: данные. эти столбцы. и столбцов могут одинаковую структуру (столбцы нескольких листов, вTumatayev таблицы листа 3 Number» = Workbooks.Open(«D:\\file3.xlsx») Dim в одну.: В общем код: А то вот, не могли быKuklP. large number ofподписи верхней строкиПримечание:Откройте каждый из исходных при этом различаться), совпадают). цикле переходя с: остается значение второйchumich mass(15, 2) ForПроблема в том, выше делает примерно такой код - Вы расшифровать макрос?: Может так(жмем кнопку)?
Примечание: worksheets, grouping can, Убедитесь, что справа и листов. воспользуйтесь консолидацией поНеобходимо чтобы в листа на листshanemac51 графы. Я попытаюсь
: Сначала действительно должны i = 1 что порядок показателей
тоже самое, но подойдёт? :)KuklP200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub www() Если сгруппировать все листы, save you aзначения левого столбца снизу достаточно свободных
На конечном листе щелкните расположению. Если же сторонний документ тянулись по порядку листов,, идея бесподобна , облегчить компьютеру задачу, происходить копирование и To 15 For в первой колонке на автомате.Option Explicit: Он не зашифрован.Dim ws As а затем открыть lot of time.либо оба флажка ячеек для консолидированных верхнюю левую ячейку на листах для данные со всех либо по списку правда сначала мозг но возможно процесс вставка столбца ID, j = 1 разный для каждойЕсли с даннымиSub tt()florenus Worksheet, l& любой из них, This works best одновременно. данных. области, в которой
соответствующих категорий используются 12 листов, но имён листов. Всего остановился, пытаясь понять, всё равно будет чтобы скопировать форматирование To 2 mass(i, таблицы + иногда конечно повезло поDim sh As:With Sheets(«Svod») группировка будет отменена. if the worksheets
Выделите на каждом листеНа вкладке требуется разместить консолидированные одинаковые названия строк
появлялись они на лишь надо организовать но потом дошло достаточно долгим. ячеек, потом же j) = firstBook.Sheets(1).Cells(i, встречаются показатели, которых расположению и вообще. Worksheet, rr AsKuklP.UsedRange.Offset(1).ClearContents Однако если выделены already have identical нужные данные. НеДанные данные. и столбцов (данные одном листе цикл. Жаль, что раноchumich идет цикл, который j) Next Next нет в остальных
DavletshinaY Range, l As, извините не правильно
For Each ws не все листы data structures. забудьте включить в
в разделеПримечание: при этом могут
tw333kПолосатый жираф алик
«спасибо» поставил -: Вот держите file2 заменяет значения скопированного secondBook.Sheets(1).Activate secondBook.Sheets(1).Range(«A1:D19»).Copy thirdBook.Sheets(1).Activate таблицах.: Здравствуйте, Long выразился. Вы не In Worksheets книги, между нимиВ этой статье них ранее выбранныеСервис Убедитесь, что справа и быть расположены по-разному),: Как тянуть один: А зачем? Что отзыв уже не с исправленным макросом. столбца ID на thirdBook.Sheets(1).Range(«B1»).Select ActiveSheet.Paste thirdBook.Sheets(1).Range(«B1:B19»).CopyTimShaнеужели кроме какFor Each sh могли бы расписатьIf Not ws.Name можно свободно переключаться,
Группировка выделенных листов данные из верхнейнажмите кнопку снизу достаточно свободных используйте консолидацию по лист на лист за выборка? Некоторые берет Работает около 4 значения столбца City. thirdBook.Sheets(1).Range(«A1»).Select ActiveSheet.Paste For: Для чего - с помощью макроса In Worksheets какая команда что = «Svod» Then
не нарушая группировки.Отмена группировки выделенных листов строки или левого
Консолидация ячеек для консолидированных
категории. в другом файле вещи можно делатьHugo121 минут. Сделать, чтобы У вас только i1 = 1 цель главная какая?! нельзя решить задачуIf sh.Name <> выполняет.l = .Cells.Find(«*»,К началу страницыГруппировка всех листов столбца. Затем нажмите. данных.Более новые версии понятно (функция importrange), «сквозь листы»!, спасибо за код работал еще быстрее заголовок не заменяется To 20 ForКак пытались сделать, объединения листов в «Лист2» ThenЕсли не трудно [a1], xlFormulas, 1,После внесения всех нужныхОтмена группировки всех листов кнопкуВыберите в раскрывающемся спискеНа вкладке Office 2011 г. а вот какВиталий лапин цикла по объединенным не смогу И или все значения k1 = 1 что конкретно не один?Set rr = конечно. Мне нужно, 1, 2).Row + изменений вы можетеНиже описан пример, когда
ДобавитьфункциюДанные их потом объединить: в икселе есть ячейкам Цикл по обратите внимание, что остаются из ID? To 15 If получается?
Спасибо. sh.[a1].CurrentRegion чтобы листы собирались 1 отменить группировку листов. в книге есть
., которую требуется использоватьв группеДля консолидации по расположению не понимаю
сводные таблицы, хорошая колонке содержащей объединенные
в файле 1Tumatayev thirdBook.Sheets(1).Cells(i1, 1) =OLEGOFFПредположим, имеется куча книгSet rr = не со второй
ws.UsedRange.Offset(1).Copy .Range(«a» &Щелкните ярлычок любого листа несколько листов, каждыйПуть к файлу вводится для консолидации данных.Работа с данными
Как объединить все страницы книги в excel в одну? нужно потом выборку сделать
диапазон данных наGustav вещь ячейки далеко не все: Только заголовок меняется mass(k1, 1) Then: Excel, все листы rr.Offset(2, 0).Resize(rr.Rows.Count - строки а с l)
группы. из которых соответствует в полеВыделите на каждом листенажмите кнопку каждом из исходных: Надо создать вертикальный
Сергей раковец — 1сTumatayev ID из второго. а значение остается
Cells(i1, 1) =Yoooo из которых надо 2, rr.Columns.Count) ‘сдвиг первой.End IfВыберите команду отдельному городу. СтруктураВсе ссылки нужные данные иКонсолидация листов должен иметь массив — перечислить франчайзинг
, как видите, я Поэтому в таблице от ID mass(k1, 2) Next, макросом в VBA объединить в один выбора таблицы на_Boroda_NextРазгруппировать листы
всех листов одинакова. нажмите кнопку. формат списка без
несколько диапазонов через: вуву не один на третьего файла есть
chumich Next End Sub можно так.
файл. Копировать руками 2 строки ниже: .Offset(1) сотритеEnd With. и отражает продажиПосле добавления данных изДобавитьВыберите в раскрывающемся списке пустых строк и точку с запятойЮзер честный форуме Общими усилиями одинаковые значения в: На первый взгляд,Во вложении работающийDoktor1962 долго и мучительно, и низ затемAliyaEnd SubСовет: кофе.
всех исходных листов.функцию
столбцов. в фигурных скобках:: Ну, естественно, никак работает 40 секунд. 1 и 2 всё правильно написано. пример. Файлы file1: А надстройка консолидация поэтому имеет смысл на 2 строки: Здр-теmigo Для разгруппирования также можноЧтобы выполнить одинаковые задачи и книг нажмитеПуть к файлу вводится, которую требуется использоватьОткройте каждый из исходных=
chumich столбце. Возможно у вас
Как объединять данные с нескольких листов в один (Формулы/Formulas)
и file3 поместите данных не подходит? использовать несложный макрос. вышеAliya: Да, то что щелкнуть ярлычок любого на определенных листах, кнопку
в поле для консолидации данных. листов и убедитесьtw333k Разве что копировать: chumich, shanemac51
chumich какое-то другое форматирование в корень дискаAleksSidОткрываем книгу, куда хотимl = rr.Rows.Count: у меня вопрос. надо! я именно
листа, не входящего сделайте следующее.ОКВсе ссылкиУстановите флажки в группе в том, что
: Спасибо, помогло.
Как соединить листы в excel
- Объединить содержимое
- 1. Объедините все листы в один лист.
- Производим открытие рабочих листов, которые мы планируем объединить в один файл.
- Передвигаемся в подраздел, имеющий наименование «Главная». Здесь в блоке команд «Формат» находим элемент под наименованием «Переместить или скопировать лист» и жмем по нему левой клавишей мышки.
- В раскрывшемся перечне жмем левой клавишей мышки на кнопку «(новая книга)».
- После реализации всех действий жмем на «ОК».
- Аналогичные операции необходимо произвести с остальными листами табличного документа.
- К примеру, у нас есть следующие данные, которые необходимо перенести в один файл. Процесс объединения будет правильно работать только при соблюдении нескольких определенных моментов. Рабочие листики, которые будут проходить процедуру консолидации, должны быть приведены к единому форматированию с идентичными заголовками и форматами информации. Ко всему прочему, объединяемая информация не должна содержать в себе незаполненных строчек и колонок.
- После того как мы произведем приведение информации из разных рабочих областей к единому форматированию, нам необходимо реализовать создание нового рабочего листа. Сделать это можно путем нажатия левой клавиши мышки на небольшой плюсик темного цвета, расположенный в нижней части интерфейса табличного редактора рядом со вкладками других листов.
- На следующем этапе мы передвигаемся в раздел, имеющий наименование «Данные». Найти его можно сверху, в основном меню табличного редактора. Здесь мы находим элемент, имеющий название «Консолидация», и жмем по нему левой клавишей мышки.
- В отобразившемся перечне жмем левой клавишей мышки по элементы «Сумма». Далее вводим координаты ячеек, которые мы планируем объединить.
- Аналогичные действия мы производим и с другой информацией, которую мы планируем объединить в один файл.
- После проведения всех необходимых действий жмем на «ОК», чтобы подтвердить внесенные изменения.
- Первоначально необходимо убедиться в том, что все необходимые табличные документы располагаются в одном месте персонального компьютера.
- На следующем этапе необходимо зайти в табличный редактор Эксель и создать в нем новую книгу, которая будет служить инструментом объединения остальных табличных документов.
- При помощи специальной комбинации горячих клавиш «Alt+F11» перемещаемся в «Visual Basic».
- Сначала нажимаем на «Вставить», а затем в появившемся перечне жмем левой клавишей мышки на элемент, имеющий наименование «Модуль».
- Теперь сюда необходимо написать следующий небольшой код:
- В переменную Path необходимо написать путь к тому месту персонального компьютера, в котором располагаются табличные документы для объединения.
- Производим сохранение табличного документа в формате «XLSM», чтобы активировать созданные макросы.
- Производим запуск макроса.
- Готово! Мы объединили все файлы, находящиеся в папке, в один табличный документ.
Учебное пособие по Excel: объединение нескольких книг / листов в одну
В Excel объединение листов — обычная, но довольно сложная задача для большинства пользователей Excel, особенно для «зеленых». В этом руководстве перечислены почти все сценарии комбинирования, с которыми вы можете столкнуться, и представлены соответствующие профессиональные решения. Вы можете быстро найти ответ, щелкнув ссылку в списке навигации ниже, или вы можете изучить навыки комбинирования, перейдя по приведенным ниже ссылкам одну за другой, если вас это интересует.
В Excel объединение можно разделить на два типа: один — только объединение содержимого, другой — объединение содержимого и выполнение некоторых вычислений.
Навигация по этому руководству
Объединить содержимое
Консолидировать
Таблица Google
Расширение
Внимание
В этом руководстве я создаю несколько листов и данных для лучшего объяснения методов. Вы можете изменить ссылки по своему усмотрению, когда используете приведенный ниже код VBA или формулы, или вы можете напрямую загрузить образцы для опробования методов.
1. Объедините все листы в один лист.
Вот рабочая тетрадь с 4 листами, которые необходимо объединить в один лист.
![]() |
![]() |
![]() |
![]() |
В Excel, кроме традиционного метода — копирования и вставки, вы можете использовать код VBA для быстрого объединения всех листов в один лист.

1. Нажмите F11 и другой ключи для включения Microsoft Visual Basic для приложений окно.

2. Затем во всплывающем окне нажмите Вставить > Модули чтобы вставить новый пустой модуль.
3. Скопируйте и вставьте приведенный ниже код в новый модуль.
VBA: объединить все листы в один

В приведенном выше коде сценарий «Комбинированный» — это имя листа, на котором размещается объединенное содержимое, вы можете изменить этот сценарий на другой по своему усмотрению.

4. нажмите F5 Клавиша для запуска кода, лист с именем Combined был создан перед всеми листами, чтобы разместить все содержимое листов.
Если вы работаете в Excel 2016 или более поздних версиях, функция запроса позволяет одновременно объединять все созданные таблицы или именованные диапазоны в одну.
Во-первых, убедитесь, что диапазоны были созданы как таблицы или именованные диапазоны, для создания таблицы и именованного диапазона см. Как преобразовать диапазон в таблицу или наоборот в Excel и Определение и использование имен в формулах.

1. Откройте книгу, в которой вы хотите объединить все листы, щелкните Данные > Новый запрос > Из других источников > Пустой запрос.
2. Во всплывающем Редактор запросов окна, перейдите к строке формул, введите в нее формулу ниже.

Нажмите Enter key, все таблицы в текущей книге были перечислены.

3. Нажмите кнопку «Развернуть» рядом с Содержание и проверить Расширьте вариант и Выбрать все столбцы флажок.

4. Нажмите OK. Все таблицы перечислены одна за другой.

Вы можете щелкнуть правой кнопкой мыши заголовок столбца, чтобы выполнить другие операции с выбранным столбцом.

5. Затем нажмите Файл > Закрыть и загрузить в….

6. в Загрузить в диалог, проверьте Настольные вариант, затем выберите место для загрузки объединенной таблицы в Выберите, куда должны быть загружены данные разделом, щелкните нагрузка.

Теперь создается новый лист для размещения всех объединенных таблиц.
Если описанные выше методы не могут вас удовлетворить, вы можете попробовать полезный и удобный инструмент, Kutools for Excel, его Сочетать Эта мощная функция не только может объединять все листы в один лист, но также может выполнять расширенные комбинированные задания, такие как объединение листов в одну книгу, объединение листов с одинаковыми именами, объединение только выбранных листов, объединение листов в файлах и т. д.
1. Включите книгу, листы которой вы хотите объединить, щелкните Кутулс Плюс > Сочетать. Появится диалоговое окно, напоминающее вам о некоторых уведомлениях о пароле. Если книги, которые вы хотите использовать, не касаются пароля, просто нажмите OK для продолжения.


2. в Объедините рабочие листы — шаг 1 из 3 окно, проверка Объедините несколько листов из книг в один лист , нажмите Далее кнопку.
3. в Шаг 2 из 3 окно, по умолчанию текущая книга была указана и проверена в Список рабочих книг панели, и все листы текущей книги были перечислены и отмечены в Список рабочих листов панели, нажмите Далее для продолжения.

Примечание: если вы открыли несколько книг, все открытые книги перечислены в списке книг, пожалуйста, отметьте только ту книгу, которую хотите использовать.

4. На последнем шаге выберите нужный режим комбинирования, вы можете выбрать Объединить по строкам or Объединить по столбцу; затем укажите другие параметры по мере необходимости. Нажмите Завершить кнопку.

5. Появится диалоговое окно, в котором вы можете выбрать одну папку для размещения объединенной книги, вы можете переименовать ее в Имя файла панель, щелкните Сохраните в конце.

6. Теперь все листы объединены вместе, и появляется диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет как тебе нравится.

Появится новая книга с перечисленным результатом объединения, щелкните ссылку Выходной файл, чтобы проверить объединенный лист.

Объединить по строкам

Объединить по столбцу
1.41 С помощью удобного инструмента, чтобы объединить только выбранные листы в один лист
Если вы хотите объединить только некоторые листы в книге в один лист, встроенная функция в Excel не может этого добиться. Но Сочетать особенность Kutools for Excel может сделать это.
1. Включите используемую книгу и нажмите Кутулс Плюс > Сочетать > OK для включения мастера объединения.


2. в Шаг 1 из 3 окно, проверка Объедините несколько листов из книг в один лист , нажмите Далее кнопку.

3. В окне Шаг 2 из 3 по умолчанию текущая книга была указана и отмечена на панели списка рабочих книг, а все листы текущей книги перечислены и отмечены на панели списка рабочих листов, снимите отметки с листов, которые не нужно объединять, нажмите «Далее», чтобы продолжить.

4. На последнем шаге укажите необходимые параметры. Нажмите Завершить кнопку.

5. Появится диалоговое окно, в котором вы можете выбрать одну папку для размещения объединенной книги, вы можете переименовать ее в Имя файла панель, щелкните Сохраните в конце.
6. Теперь только отмеченные листы были объединены вместе, и появится диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет как тебе нравится.

1.42 С помощью удобного инструмента для объединения листов из нескольких книг в один лист

Например, вы хотите объединить все листы book1, book2 и book3 в один лист, как показано на скриншоте ниже. Сочетать особенность Kutools for Excel также может вам помочь.
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Включите используемые книги и нажмите Кутулс Плюс > Сочетать > OK для Сочетать Мастер.

2. в Шаг 1 из 3 окно, проверка Объедините несколько листов из книг в один лист , нажмите Далее кнопку.

3. в Шаг 2 из 3 окно, все открытые книги были перечислены и отмечены в Список рабочих книг панели, и все листы открытых книг были перечислены и отмечены в Список рабочих листов панели, нажмите Далее для продолжения.

Совет: если вы хотите добавить книги для объединения, нажмите кнопку «Добавить», чтобы выбрать путь для добавления книг.
4. На последнем шаге выберите нужные вам параметры. Нажмите Завершить кнопку.

5. Появится диалоговое окно, в котором вы можете выбрать одну папку для размещения объединенной книги, вы можете переименовать ее в Имя файла панель, щелкните Сохраните в конце.
6. Теперь все листы в открытых книгах были объединены вместе, и появится диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет как тебе нравится.
Откройте объединенную книгу, которую вы сохранили, листы книг были объединены в один лист.
2. Объедините несколько книг в одну книгу.
Вот три книги, которые необходимо объединить в одну книгу.
| Января | фев | Вт |
![]() |
![]() |
![]() |
янв.xlsx
фев.xlsx
мар.xlsx
Только для объединения листов в нескольких книгах Excel Переместить или скопировать Команда может оказать вам услугу.

1. Откройте первые две книги, которые вы хотите объединить, активируйте первую книгу, выберите листы, которые вы хотите переместить, а затем щелкните правой кнопкой мыши, чтобы включить контекстное меню, и нажмите Переместить или скопировать.
1) Щелкните правой кнопкой мыши на одной вкладке и выберите Выбрать все листы из контекстного меню сначала, если вы хотите переместить все листы, затем используйте Переместить или скопировать команда.
2) Холдинг Ctrl Клавиша выбора нескольких несмежных листов.
3) Выберите первый лист и удерживайте Shift Клавиша выбора последнего листа для выбора нескольких соседних листов.

2. в Переместить или скопировать диалог, в Бронировать раскрывающийся список, выберите книгу, в которую вы хотите переместить листы, здесь выберите Янв, затем укажите место, в которое вы хотите поместить листы. Перед листом разделом, щелкните OK.
1) Вам лучше проверить Создать копию, или исходная книга потеряет лист после перемещения.

2) Если вы хотите поместить все книги в новую книгу, выберите (новая книга) in Бронировать выпадающий список.

Как листы были перемещены в основную книгу.
Повторите шаги, описанные выше, чтобы переместить все книги в одну.
Чтобы объединить множество книг, которые все находятся в одной папке, вы можете использовать код VBA.

1. Включите книгу, в которую вы хотите объединить все книги, затем нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. Во всплывающем окне щелкните Вставить > Модули чтобы вставить новый пустой модуль.
3. Скопируйте и вставьте ниже код VBA в новый модуль.
VBA: объединить несколько книг в текущую книгу

В коде VBA сценарий » C: \ Users \ AddinTestWin10 \ Desktop \ объединить листы \ объединить листы в одну книгу \ «- это путь к папке, в которой находятся книги, которые вы хотите объединить, измените его в соответствии с вашими потребностями.
Если книги, которые вы хотите объединить, находятся в разных папках, сначала скопируйте их в одну папку.

4. Нажмите F5 нажмите клавишу для запуска кода, тогда все книги будут скопированы в конец текущей книги.
Наконечник: все скопированные листы будут использовать свое исходное имя, если вы хотите использовать имя книги в качестве префикса, используйте приведенный ниже код:


Иногда вам может потребоваться объединить все книги из разных папок в одну книгу. Например, чтобы объединить все книги в папке 2020 и 2021 в одну книгу, в Excel нет прямого способа справиться с этим.
Однако Сочетать особенность Kutools for Excel предоставляет возможность объединить книги из нескольких папок в одну.
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Включите Excel, щелкните Кутулс Плюс > Сочетать, Появится диалоговое окно, напоминающее вам о некоторых уведомлениях о пароле. Если книги, которые вы хотите использовать, не касаются пароля, просто нажмите OK для продолжения.


2. в Объедините рабочие листы — шаг 1 из 3 окно, проверка Объедините несколько листов из книг в одну книгу , нажмите Далее кнопку.

3. в Шаг 2 из 3 в окне щелкните стрелку рядом с Добавить кнопку, чтобы отобразить раскрывающееся меню, щелкните Папка.
4. Затем в Выбор папки диалоговом окне выберите одну папку, которую вы хотите использовать, щелкните Выбор папки добавить это к Список рабочих книг .


5. Повторите описанный выше шаг, чтобы добавить все папки и перечислить все книги в Список рабочих книг, нажмите Далее.

6. На последнем шаге выберите нужные вам параметры. Нажмите Завершить кнопку.

7. Появится диалоговое окно, в котором вы можете выбрать одну папку для размещения объединенной книги, вы можете переименовать ее в Имя файла панель, щелкните Сохраните в конце.

8. Теперь все листы объединены вместе, и появляется диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет как тебе нравится.

Появится новая книга, в которой перечислены результаты объединения, щелкните ссылку Выходной файл, чтобы проверить объединенный лист.
Примечание: в объединенной книге первый лист с именем Kutools for Excel содержит некоторую информацию об исходных листах и окончательных комбинированных листах, вы можете удалить его, если вам не нужно.
3. Объедините отдельные листы из нескольких книг в одну книгу.
Если вы хотите объединить только несколько листов книг в одну книгу, а не все листы каждой книги, вы можете попробовать следующие методы.
четверть-1.xlsx
четверть-2.xlsx
четверть-3.xlsx
1. Откройте книгу, чтобы найти объединенные листы, затем нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. Во всплывающем окне щелкните Вставить > Модули чтобы вставить новый пустой модуль.
3. Скопируйте и вставьте ниже код VBA в новый модуль.
VBA: объединить определенные листы нескольких книг в текущую книгу

1) В коде VBA скрипт » C: \ Users \ AddinTestWin10 \ Desktop \ объединить листы \ объединить определенные листы из нескольких книг \ «- это путь, по которому находятся книги, которые вы хотите объединить, измените его в соответствии с вашими потребностями.
2) В коде VBA скрипт » А, В «- это имена отдельных листов из книг, которые я хочу объединить, измените их по своему усмотрению, используя запятые для разделения каждого имени листа.
3) Если книги, которые вы хотите объединить, находятся в разных папках, сначала скопируйте их в одну папку.

4. Нажмите F5 ключ для запуска кода, то только определенные рабочие листы будут скопированы в конец текущей книги.
Если книги, которые вы хотите объединить, находятся во многих разных папках, вы можете попробовать Kutools for ExcelАвтора Сочетать функцию.
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Включите Excel, щелкните Кутулс Плюс > Сочетать, Появится диалоговое окно, напоминающее вам о некоторых уведомлениях о пароле. Если книги, которые вы хотите использовать, не касаются пароля, просто нажмите OK для продолжения.

2. в Объедините рабочие листы — шаг 1 из 3 окно, проверка Объедините несколько листов из книг в одну книгу , нажмите Далее кнопку.


3. в Шаг 2 из 3 в окне щелкните стрелку рядом с Добавить кнопку, чтобы отобразить раскрывающееся меню, щелкните Папка.
4. Затем в Выбор папки диалоговом окне выберите одну папку, которую вы хотите использовать, щелкните Выбор папки добавить это к Список рабочих книг .


5. Повторите вышеуказанный шаг, чтобы добавить все папки и перечислить все книги в Список рабочих книг.

6. Тогда оставайтесь в Шаг 2 из 3 в окне выберите одну книгу в Список рабочих книг, и проверяйте только те листы, которые хотите использовать в Список рабочих листовзатем нажмите Тот же лист кнопка. Теперь все одноименные листы рабочих тетрадей в Список рабочих книг были проверены. Нажмите Далее для продолжения.

7. На последнем шаге выберите нужные вам параметры. Нажмите Завершить кнопку.

8. Появится диалоговое окно, в котором вы можете выбрать одну папку для размещения объединенной книги, вы можете переименовать ее в Имя файла панель, щелкните Сохраните заканчивать
9. Теперь отдельные листы были объединены вместе, и появляется диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет как тебе нравится.
Появится новая книга, в которой перечислены результаты объединения, щелкните ссылку Выходной файл, чтобы проверить объединенный лист.

Примечание: в объединенной книге первый лист с именем Kutools for Excel содержит некоторую информацию об исходных листах и окончательных комбинированных листах, вы можете удалить его, если вам не нужно.
4. Объедините два листа на основе ключевого столбца.
Как показано на скриншоте ниже, есть две таблицы на двух листах, вы хотите объединить эти две таблицы в одну на основе одного ключевого столбца в Excel.
| Table1 | Table2 |
![]() |
![]() |
| Комбинированный стол |
![]() |
Компания запрос Функция в Excel 2016 или более поздних версиях очень мощная, она поддерживает объединение двух таблиц на основе ключевого столбца.
Перед использованием запрос убедитесь, что диапазоны, которые вы хотите объединить, были созданы в виде таблиц.
объединить две таблицы на основе ключевого столбца запроса.xlsx
1. Щелкните любую ячейку первой таблицы, щелкните Данные > Из таблицы в Получить и преобразовать группа.


2. в Редактор запросов диалоговое окно, нажмите Файл > Закрыть и загрузить к команда. Смотрите скриншот:

3. Затем во всплывающем Загрузить в диалог, проверьте Только создать соединение вариант. Нажмите нагрузка.

Теперь вы можете увидеть Запросы к книге отображение панели, и таблица была указана на панели в виде ссылки.

Повторите шаги, указанные выше, чтобы добавить вторую таблицу в Запросы к книге панель.
4. Затем нажмите Данные > Новый запрос > Объединить запросы > идти.


5. в идти В двух раскрывающихся списках отдельно выберите две таблицы, которые вы хотите объединить. Таблица внизу будет объединена с таблицей выше.

6. Щелкните ключевой столбец, на основе которого вы хотите объединить две таблицы, щелкните OK.

7. Merge1 — редактор запросов всплывающее окно, нажмите кнопку «Развернуть» рядом с Новая колонка, затем отметьте все столбцы, кроме ключевого, снимите флажок Использовать исходное имя столбца в качестве префикса флажок, щелкните OK.

Теперь две таблицы были объединены в одну на основе указанного ключевого столбца.
8. Нажмите Файл > Закрыть и загрузить в, В Загрузить в диалог, проверьте Настольные вариант и укажите место, которое вы хотите загрузить. Нажмите нагрузка.



Теперь две таблицы были объединены на основе ключевого столбца.
Если вы хотите переместить только один или два столбца с одного листа на другой и определить местоположение на основе ключевого столбца, функции Excel могут вам помочь.
Например, переместите полные данные с листа 2 на лист 1 и на основе столбца A найдите данные.
объединить два листа на основе ключевого столбца functions.xlsx
| Sheet1 | Sheet2 |
![]() |
![]() |
4.21 Объединение двух листов по столбцу с помощью функции ВПР.
1. Скопируйте и вставьте формулу ниже рядом с таблицей на листе 1:
= ВПР (A2; Лист2! $ A $ 2: $ B $ 5,2; ЛОЖЬ)
A2: первое значение поиска (ключевой столбец);
Sheet2! $ A $ 2: $ B $ 5: массив таблицы, таблица содержит два или более столбца, в которых находятся столбец значения поиска и столбец значения результата;
2: индекс столбца, конкретный номер столбца (это целое число) table_array, из которого вы вернете совпадающее значение.

2. Нажмите Enter ключ, чтобы получить первый результат.

3. Затем перетащите маркер автозаполнения вниз, чтобы заполнить все данные.

4. Не снимая выделения с ячеек формулы, щелкните Главная вкладка и перейдите к форматированию ячеек так, как вам нужно, в Число группа.
4.22 Объединение двух листов по столбцу с помощью формулы объединение функций ПОИСКПОЗ и ИНДЕКС
1. Скопируйте и вставьте формулу ниже рядом с таблицей на листе 1:
Sheet2! $ B $ 2: $ B $ 5: столбец с совпадающим значением, которое вы хотите найти;
Sheet1! A2: первое значение поиска (в ключевом столбце);
Sheet2! $ A $ 2: $ A $ 5: ключевой столбец, на основе которого вы хотите объединить два листа.

2. Нажмите Enter ключ, чтобы получить первый результат.

3. Затем перетащите маркер автозаполнения вниз, чтобы заполнить все данные.

4. Не снимая выделения с ячеек формулы, щелкните Главная вкладка и перейдите к форматированию ячеек так, как вам нужно, в Число группа.
Кроме функции объединения, есть еще одна мощная функция — Слияние таблиц in Kutools for Excel, который может быстро и легко объединить два листа на основе одного ключевого столбца.
Комбинировать два листа на основе ключевого столбца удобный инструмент.xlsx
После бесплатная установка Kutools for Excel, сделайте следующее:

1. Нажмите Кутулс Плюс >Слияние таблиц.

2. В TСлияние способностей — шаг 1 из 5 в окне выберите диапазоны таблиц в Выберите основную таблицу и Выберите таблицу поиска раздел отдельно, нажмите Далее.

3. в Шаг 2 из 5 в окне, отметьте ключевой столбец, на основе которого вы хотите объединить, щелкните Далее.

4. в Шаг 3 из 5 в окне вы можете проверить столбцы, данные в которых вы хотите обновить, на основе таблицы поиска, если вам не нужны данные для обновления, просто щелкните непосредственно Далее.

5. в Шаг 4 из 5 в окне, здесь отметьте столбцы, которые вы хотите объединить в основную таблицу, затем нажмите Далее.

6. На последнем шаге укажите нужные вам параметры, нажмите Завершить.
Эта функция поддерживает объединение двух листов в разных книгах.
5. Объедините два листа на основе двух столбцов.
Предположим, есть две таблицы на листе Sheet1 и Sheet2 отдельно, теперь, чтобы переместить данные в столбце End_Dates с листа2 на лист1 на основе столбца Project и столбца Start_Date, как показано ниже:
| Sheet1 | Sheet2 |
![]() |
![]() |
| Комбинированный лист |
![]() |
В Excel встроенные функции не поддерживают эту операцию, но Слияние таблиц of Kutools for Excel может справиться с этим.
После бесплатная установка Kutools for Excel, сделайте следующее:

1. Нажмите Кутулс Плюс > Слияние таблиц.

2. в Объединение таблиц — шаг 1 из 5 в окне выберите диапазоны таблиц в Выберите основную таблицу и Выберите вкладку поискараздел e отдельно, нажмите Далее.
3. в Шаг 2 из 5 в окне отметьте два ключевых столбца, на основе которых вы хотите объединить, щелкните Далее.

Примечание: автоматически соответствующие столбцы в таблице поиска будут сопоставлены, вы можете щелкнуть имя столбца в столбцах таблицы поиска, чтобы изменить их по своему усмотрению.
4. в Шаг 3 из 5 в окне вы можете проверить столбцы, данные в которых вы хотите обновить, на основе таблицы поиска, если вам не нужны данные для обновления, просто щелкните непосредственно Далее.


5. в Шаг 4 из 5 в окне, отметьте здесь столбцы, которые вы хотите объединить в основную таблицу, затем щелкните Далее.

6. На последнем шаге укажите нужные вам параметры, нажмите Завершить.

Затем столбцы, которые вы хотите добавить, были добавлены в конец основной таблицы.
Эта функция поддерживает объединение двух листов в разных книгах.
6. Объедините листы с одинаковыми заголовками.
Чтобы объединить несколько листов с одинаковым заголовком, как показано на скриншоте ниже:
![]() |
![]() |
![]() |
![]() |
| Комбинированный лист |
![]() |
Существует код VBA, который может объединить все листы книги с одинаковыми заголовками.
1. Включите книгу, в которой вы хотите объединить листы с одинаковым заголовком, затем нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. Во всплывающем окне щелкните Вставить > Модули чтобы вставить новый пустой модуль.
3. Скопируйте и вставьте ниже код VBA в новый модуль.
VBA: объединить листы с одинаковым заголовком


4. нажмите F5 нажмите клавишу для запуска кода, появится диалоговое окно с запросом количества строк заголовка, введите число в текстовое поле. Нажмите OK.

Теперь все листы в этой книге были объединены в новый лист с именем Combined.
Компания Сочетать особенность Kutools for Excel также может справиться с этой задачей и поддерживает объединение листов в книгах.
После бесплатная установка Kutools for Excel, сделайте следующее:

1. Включите книгу, листы которой вы хотите объединить с одинаковыми заголовками, щелкните Кутулс Плюс > Сочетать.

2. Появится диалоговое окно с напоминанием о пароле. Если книги, которые вы используете, не содержат паролей, щелкните OK продолжить. В появлении Объедините рабочие листы — шаг 1 из 3 окно, проверка Объедините несколько листов из книг в один лист , нажмите Далее.

3. в Шаг 2 из 3 окно, все листы перечислены и зарегистрированы Список рабочих листов разделом, щелкните Далее продолжать.

1) Если вы хотите объединить только некоторые листы, просто отметьте нужные имена листов и оставьте другие не отмеченными.

2) Если вы хотите добавить больше книг для объединения, щелкните Добавить для добавления файлов или папок в Список рабочих книг .

4. в Шаг 3 из 3, проверить Объединить по строкам вариант и введите количество строк заголовка в поле Количество строк заголовка текстовое поле, укажите другие параметры по своему усмотрению. Нажмите Завершить.

5. Выберите папку и дайте имя новой книге в Укажите имя файла и расположение для объединенной книги диалоговое окно, нажмите Сохраните.

6. Появится диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет для вас нужно. Появится рабочая книга со списком ссылок на исходную книгу и новую книгу, щелкните ссылку пути к новой книге, чтобы открыть ее для проверки.
1. Объедините листы и произведите расчеты.
Например, есть три листа с одинаковыми заголовками строк и столбцов, теперь вы хотите объединить их с одинаковыми заголовками и суммировать данные, как показано на скриншотах ниже.
![]() |
![]() |
![]() |
| Результат |
![]() |
В Excel Консолидировать функция поддерживает объединение листов и выполнение расчетов.

1. Включите книгу, листы которой вы хотите объединить, и выберите ячейку, в которую вы хотите поместить объединенные данные, щелкните Данные > Консолидировать.
2. в Консолидировать диалоговое окно, выполните следующие настройки:

1). Функция в раскрывающемся меню выберите расчет, который нужно выполнить после объединения листов.

2) Щелкните значок выбора рядом с Приложения кнопку, чтобы выбрать диапазон для объединения, и нажмите кнопку Добавить до Все ссылки .

Повторите этот шаг, чтобы добавить все диапазоны, которые необходимо объединить в Все ссылки .

3). Используйте ярлыки в раздел, проверьте Верхний ряд и Левая колонка флажки, если диапазоны имеют как заголовок строки, так и заголовок столбца.

4) Если вы хотите, чтобы объединенное содержимое изменялось по мере изменения данных источников, установите флажок Создавать ссылки на исходные данные флажок.
3. Нажмите OK. Диапазоны объединены и суммированы по заголовкам.

Примечание: если диапазоны, которые вы хотите объединить, находятся в других книгах, нажмите кнопку «Обзор» в диалоговом окне «Объединить», чтобы выбрать книгу, а затем введите имя листа и диапазон в текстовое поле и нажмите «Добавить», чтобы добавить диапазон в раздел «Все ссылки».
Компания Сочетать особенность Kutools for Excel поддерживает объединение листов в нескольких книгах и выполнение вычислений на одном листе.
После бесплатная установка Kutools for Excel, сделайте следующее:

1. Включите книги, которые вы хотите объединить, щелкните Кутулс Плюс > Сочетать.

2. Появится диалоговое окно с напоминанием о пароле. Если книги, которые вы используете, не содержат паролей, щелкните OK продолжить. В появлении Объедините рабочие листы — шаг 1 из 3 окно, проверка Объединяйте и вычисляйте значения из нескольких книг на одном листе , нажмите Далее.

3. в Шаг 2 из 3 окно, все листы открытых книг перечислены и проверены Список рабочих листов разделом, щелкните Далее продолжать.
Совет: если вы хотите объединить только некоторые листы, просто отметьте нужные имена листов и оставьте другие не отмеченными. Если вы хотите добавить больше книг для объединения, нажмите «Добавить», чтобы добавить файлы или папки в раздел «Список книг». 

4. в Шаг 3 из 3, укажите расчет, нужные вам ярлыки. Нажмите Завершить.

5. Выберите папку и дайте имя новой книге в Укажите имя файла и расположение для объединенной книги диалоговое окно, нажмите Сохраните.

6. Появится диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет для вас нужно. Появится рабочая книга со списком ссылок на исходную книгу и новую книгу, щелкните ссылку пути к новой книге, чтобы открыть ее для проверки.
2. Объедините несколько листов в сводную таблицу.
Если ваши данные имеют простую структуру, как показано на скриншоте ниже, вы можете напрямую объединить листы в сводную таблицу.
![]() |
![]() |
![]() |

1. Включите рабочую книгу, которую вы будете использовать, щелкните Настройка панели быстрого доступа > Дополнительные команды.

2. Во всплывающем Параметры Excel окно, выберите Все команды из Выберите команды из раздел, затем перетащите полосу прокрутки, чтобы выбрать Мастер сводных таблиц и диаграмм.

3. Нажмите Добавить добавить Мастер сводных таблиц и диаграмм до Настройка панели быстрого доступа, нажмите OK.
4. Нажмите Мастер сводных таблиц и диаграмм на панели инструментов и в Шаг 1 из 3, проверить Несколько диапазонов консолидации и сводная таблица параметры, щелкните Далее.



5. в Шаг 2а из 3, отметьте, что я создам опцию полей страницы, нажмите Далее.

6. в Шаг 2b из 3, щелкните значок выбора, чтобы выбрать диапазон, который вы хотите объединить, щелкните Добавить добавить его в Все диапазоны раздел, повторите этот шаг, чтобы добавить все диапазоны, используемые для объединения. Отметьте 0 в Сколько полей страницы вы хотите. Нажмите Далее.

7. Выберите место, в котором вы хотите создать сводную таблицу. Шаг 3 из 3, нажмите Завершить.

Теперь сводная таблица создана, укажите настройки в Поля сводной таблицы панель, как вам нужно.
Примечание: если структура данных сложная, на мой взгляд, объедините листы с общим списком методов выше, а затем преобразуйте лист результатов в сводную таблицу.
1. Объедините листы Google в один лист.
Предположим, что необходимо объединить три листа Google в один, как показано на скриншоте ниже:
![]() |
![]() |
![]() |
На листе, на котором вы хотите разместить комбинированные данные, выберите ячейку, введите формулу ниже:

= (

Затем данные на листах A, B и C были скопированы.
А, В, С имена листов, A2: B диапазон данных на каждом листе, A2: A — это первый столбец каждого диапазона данных.
Эта формула часто используется для объединения двух диапазонов в таблице Google.
Выберите ячейку под первым диапазоном данных, введите формулу ниже:

=IMPORTRANGE(«https://docs.google.com/spreadsheets/d/13K4vuZukmS4-x0qJs0EAXQkneIdNqelruDBF5ff5xNQ/edit»,»B!A2:B4″)

Затем данные из листа B были скопированы ниже.

это расположение листа, вы можете найти его в строке веб-адреса.
В! А2: В4 — это диапазон ячеек на листе B, который вы хотите скопировать в первый диапазон.

Примечание: если ячейка, в которой размещается формула, была отредактирована ранее, формула вернет # ССЫЛКА!
2. Объедините листы Google в одну книгу.
Если вы хотите объединить листы из нескольких книг в Google Sheet, нет быстрого способа, как Excel.
Чтобы объединить листы Google из книг в одну книгу, вы можете использовать Скопировать в команда контекстного меню.

Щелкните правой кнопкой мыши лист, который вы хотите использовать, щелкните Скопировать в > Новая таблица or Существующая таблица.

Если вы выбираете Новая таблица, появится диалоговое окно с напоминанием о том, что лист был скопирован, щелкните OK. Теперь текущий лист скопирован в новую книгу. Вы можете нажать Открыть таблицу Проверять.
Если вы выбираете Существующая таблица, Выберите электронную таблицу, в которую нужно скопировать этот лист появляется диалоговое окно.
1) Выберите, где находится существующая электронная таблица;
2) Выберите книгу, в которую вы хотите скопировать лист. Файлы;
3) Или вы можете напрямую ввести веб-адрес книги, в которую хотите скопировать, в поле Или вставить веб-адрес здесь .

4) Нажмите Выберите.

Если лист копируется в новую электронную таблицу, имя листа в новой книге совпадает с исходным именем, если лист копируется в существующую электронную таблицу, к имени листа в объединенной книге будет добавлен префикс Копия .
1. Объедините листы и удалите дубликаты.
Предположим, есть два листа, на которых есть несколько дубликатов, нам нужно объединить данные и удалить дубликаты, как показано на скриншоте ниже:
![]() |
![]() |
| Общий результат | Удалить дубликаты |
![]() |
![]() |
В Excel Удалить дубликаты функция поможет вам быстро удалить повторяющиеся данные.

После использования вышеуказанных методов для объединения листов, затем выберите объединенные данные, нажмите Данные > Удалить дубликаты.

В разделе Удалить дубликаты диалоговом окне выберите столбцы, из которых вы хотите удалить дубликаты, вы можете проверить У моих данных есть заголовки чтобы игнорировать заголовки, нажмите OK.

Затем повторяющиеся строки были удалены.
Если нужно объединить только два диапазона и удалить дубликаты, Слияние таблиц of Kutools for Excel может напрямую удалять дубликаты при объединении.
После бесплатная установка Kutools for Excel, сделайте следующее:

1. Включите книгу, содержащую данные, которые вы хотите объединить, щелкните Кутулс Плюс > Слияние таблиц.

2. В TСлияние способностей — шаг 1 из 5 выберите два диапазона, которые вы хотите объединить, и, если в таблицах есть два заголовка, установите флажок Основная таблица имеет заголовок и Таблица поиска имеет заголовок флажки, щелкните Далее.

3. в Шаг 2 из 5 в окне, отметьте ключевой столбец, на основе которого вы хотите объединить диапазоны, щелкните Далее.
4. в Шаг 3 из 5 в окне вы можете проверить столбцы, данные в которых вы хотите обновить, на основе таблицы поиска, щелкните Далее перейти к последнему шагу.

Совет: если в таблице поиска есть новый столбец, который необходимо добавить в основную таблицу, появится окно шага 4 из 5 для добавления столбцов.

5. в Шаг 5 из 5 окно, в Добавить параметры раздел, проверка Добавить несовпадающие строки в конец основной таблицы флажок в Варианты обновления раздел, проверка Обновляйте ячейки только при наличии данных в таблице поиска флажок. Нажмите Завершить.
Затем две таблицы объединяются в основную таблицу без дубликатов.
2. Объедините рабочие листы с одинаковыми именами в один рабочий лист.
Предположим, что существует несколько книг с листами с одинаковыми именами, такими как лист1, лист2, теперь, чтобы объединить все листы с именем лист1 в один лист, все листы с именем лист2 в один лист, как показано ниже, вы можете использовать Kutools for ExcelАвтора Сочетать функция, чтобы быстро справиться с этой работой.
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
После бесплатная установка Kutools for Excel, сделайте следующее:

1. Включите книги, которые вы объедините, нажмите Kутулс плюс > Сочетать.

2. Появится диалоговое окно с напоминанием о пароле. Если книги, которые вы используете, не содержат паролей, щелкните OK продолжить. В появлении Объедините рабочие листы — шаг 1 из 3 окно, проверка Объедините все листы с одинаковыми именами в один лист , нажмите Далее.

3. в Шаг 2 из 3 окно, все листы открытых книг перечислены и проверены Список рабочих листов разделом, щелкните Далее продолжать.
Если вы хотите объединить только некоторые листы, просто отметьте нужные имена листов и оставьте другие не отмеченными.
Если вы хотите добавить больше книг для объединения, щелкните Добавить для добавления файлов или папок в Список рабочих книг .

4. в Шаг 3 из 3, укажите нужные вам настройки. Нажмите Завершить.

5. Выберите папку и дайте имя новой книге в Укажите имя файла и расположение для объединенной книги диалоговое окно, нажмите Сохраните.

6. Появится диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет для вас нужно. Появится рабочая книга со списком ссылок на исходную книгу и новую книгу, щелкните ссылку пути к новой книге, чтобы открыть ее для проверки.
Объединить по строкам

Объединить по столбцу
3. Объедините одинаковые диапазоны на разных листах в один лист.
Если вы хотите объединить одни и те же диапазоны на листах в один лист, например, объедините только диапазон A1: B5 книги A и книги B в один лист, функция объединения Kutools for Excel будет хорошим выбором.
| A | B | Комбинированный реуслт |
![]() |
![]() |
![]() |

1. Включите книги, которые вы будете использовать, щелкните Кутулс Плюс > Сочетать.

2. Появится диалоговое окно с напоминанием о пароле. Если книги, которые вы используете, не содержат паролей, щелкните OK продолжить. В появлении Объедините рабочие листы — шаг 1 из 3 окно, проверка Объедините несколько листов из книг в один лист , нажмите Далее.
3. в Шаг 2 из 3 окно, все листы открытых книг перечислены и проверены Список рабочих листов раздел, щелкните значок выбора в Список рабочих листов, затем выберите диапазон, который вы хотите использовать. Затем нажмите Тот же диапазон кнопку, чтобы установить диапазон всех листов A1: B5. Нажмите Далее.

1) Если вы хотите объединить только некоторые листы, просто отметьте нужные имена листов и оставьте другие не отмеченными.
2) Если вы хотите добавить больше книг для объединения, щелкните Добавить для добавления файлов или папок в Список рабочих книг .
4. в Шаг 3 из 3, укажите нужные вам настройки. Нажмите Завершить.
5. Выберите папку и дайте имя новой книге в диалоговом окне «Укажите имя файла и расположение для объединенной книги», нажмите Сохраните.
6. Появится диалоговое окно, в котором вас спросят, сохранить ли настройки как сценарий, нажмите Да or Нет для вас нужно. Появится рабочая книга со списком ссылок на исходную книгу и новую книгу, щелкните ссылку пути к новой книге, чтобы открыть ее для проверки.
Вы также можете быть заинтересованы в
Объединение / импорт нескольких файлов CSV в несколько листов
Предоставляет методы для импорта файлов CSV в Excel
Объедините ячейки и сохраните форматирование ячеек в Excel
В этой статье это поможет вам быстро объединить ячейки и сохранить форматирование.
Объедините содержимое нескольких ячеек без потери данных в Excel
Здесь представлены быстрые способы объединения нескольких ячеек без потери данных.
Объединить дату и время в одну ячейку в Excel
Он дает два способа объединения даты и времени в одну ячейку и отображения как datetime.
Как объединить файлы Excel в один
Часто при работе в табличном редакторе происходит так, что необходимая информация располагается на отдельных рабочих листах или же файлах. Перед пользователями встает задача объединения нескольких листов и файлов в единое целое. Можно, конечно, путем копирования ячеек из одного документа и вставки их в другой файл реализовать процедуру объединения, но это неудобно и неэффективно. В статье мы детально рассмотрим несколько эффективных методов, позволяющих реализовать объединение табличных документов в один.
Объединение рабочих листов в один в табличном редакторе
Первоначально рассмотрим такую процедуру, как объединение рабочих листов в один документ. Подробная инструкция выглядит так:
Объединение информации в один файл
Часто возникают такие ситуации, когда необходимо произвести объединение некоторых фрагментов информации в единый файл. Эта процедура выполняется достаточно легко при помощи инструментов табличного редактора. Самое главное – информация, расположенная в табличках, должна быть заранее отформатирована, чтобы в дальнейшем не тратить огромное количество времени на приведение общей таблички к нормальному внешнему виду. Подробная инструкция выглядит так:
На заметку! Процедуру объединения можно реализовать и на той области, на которой уже находится нужная информация, но так можно запутаться из-за большого количества исходных данных.
Важно! Этот метод плохо работает с информацией текстового вида. Для более качественного объединения данных в один файл следует воспользоваться следующим методом, подразумевающим использование макросов.
Объединение файлов при помощи VBA
Макросы, прописываемые в VBA, превосходно подходят для реализации процедуры объединения нескольких табличных документов в единый файл. Процедура не такая сложная, как кажется на первый взгляд. Главное – следовать пунктам подробной инструкции:
Заключение
Мы выяснили, что существует множество способов, позволяющих реализовать объединение нескольких файлов в один табличный документ. Использовать функцию под названием «Консолидация» целесообразно только в том случае, если в файлах содержится только числовая информация, так как функция не способна корректно работать с данными текстового формата. Самый эффективный способ, позволяющий качественно объединить табличный документы в один файл без потери информации, – это использование интегрированного языка программирования «Visual Basic» и активация специальных макросов. Однако каждый пользователь сможет сам подобрать более удобный для себя способ объединения табличных документов.






































