Excel надстройка объединение файлов - Word и Excel - помощь в работе с программами

Как быстро объединить несколько файлов Excel

Мы рассмотрим три способа объединения файлов Excel в один: путем копирования листов, запуска макроса VBA и использования инструмента «Копировать рабочие листы» из надстройки Ultimate Suite.

Намного проще обрабатывать данные в одном файле, чем переключаться между многочисленными книгами. Однако объединение нескольких книг Excel в один файл может быть сложным и долгим процессом, особенно если книги, которые вам нужно объединить, содержат много листов. Итак, как подойти к этой проблеме? Вы будете копировать их вручную или с помощью кода VBA? Или вы используете один из специализированных инструментов для объединения файлов Excel?

Ниже вы найдете несколько хороших способов, позволяющих реализовать объединение.

Самое простое — копировать вручную.
Объединение файлов Excel при помощи VBA.
Как объединить несколько файлов с помощью Ultimate Suite.

Примечание. В этой статье мы рассмотрим, как копировать листы из нескольких книг Excel в одну книгу. Если вы ищете быстрый способ скопировать данные с нескольких листов на один общий лист, вы найдете подробную инструкцию в другой статье: Как объединить несколько листов в один.

Простой метод — копировать листы руками.

Если вам нужно объединить всего пару файлов Excel, вы можете вручную скопировать или переместить листы из одного файла в другой. Вот как это можно сделать:

Откройте книги, которые мы планируем объединить.
Выберите листы в исходной книге, которые вы хотите скопировать в основную книгу.

Чтобы выбрать несколько листов, используйте один из следующих приемов:

Чтобы выбрать соседние листы, щелкните вкладку первого, который вы хотите скопировать, нажмите и удерживайте клавишу Shift, а затем щелкните вкладку последнего. Это действие выберет все листы между ними.
Чтобы выбрать несмежные, удерживайте клавишу Ctrl и щелкайте вкладку каждого из них по отдельности.
Выделив все нужные листы, щелкните правой кнопкой мыши любую из выделенных вкладок и выберите «Переместить» или «Копировать…» .

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

Чтобы объединить вкладки из нескольких файлов Excel, повторите описанные выше шаги для каждой книги отдельно.

Замечание. При копировании листов вручную помните о следующем ограничении, налагаемом Excel: невозможно переместить или скопировать группу листов, если какой-либо из них содержит «умную» таблицу. В этом случае вам придется либо преобразовать таблицу в диапазон, либо использовать один из других методов, не имеющих этого ограничения.

Как объединить файлы Excel с VBA

Если у вас есть несколько файлов Excel, которые необходимо объединить в один файл, более быстрым способом будет автоматизировать процесс с помощью макроса VBA.

Ниже вы найдете код VBA, который копирует все листы из всех файлов Excel, которые вы выбираете, в одну книгу. Этот макрос MergeExcelFiles написан Алексом.

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

Sub MergeExcelFiles()
    Dim fnameList, fnameCurFile As Variant
    Dim countFiles, countSheets As Integer
    Dim wksCurSheet As Worksheet
    Dim wbkCurBook, wbkSrcBook As Workbook
 
    fnameList = Application.GetOpenFilename(FileFilter:="Microsoft Excel Workbooks (*.xls;*.xlsx;*.xlsm),*.xls;*.xlsx;*.xlsm", Title:="Choose Excel files to merge", MultiSelect:=True)
 
    If (vbBoolean <> VarType(fnameList)) Then
 
        If (UBound(fnameList) > 0) Then
            countFiles = 0
            countSheets = 0
 
            Application.ScreenUpdating = False
            Application.Calculation = xlCalculationManual
 
            Set wbkCurBook = ActiveWorkbook
 
            For Each fnameCurFile In fnameList
                countFiles = countFiles + 1
 
                Set wbkSrcBook = Workbooks.Open(Filename:=fnameCurFile)
 
                For Each wksCurSheet In wbkSrcBook.Sheets
                    countSheets = countSheets + 1
                    wksCurSheet.Copy after:=wbkCurBook.Sheets(wbkCurBook.Sheets.Count)
                Next
 
                wbkSrcBook.Close SaveChanges:=False
 
            Next
 
            Application.ScreenUpdating = True
            Application.Calculation = xlCalculationAutomatic
 
            MsgBox "Processed " & countFiles & " files" & vbCrLf & "Merged " & countSheets & " worksheets", Title:="Merge Excel files"
        End If
 
    Else
        MsgBox "No files selected", Title:="Merge Excel files"
    End If
End Sub

Как добавить этот макрос в книгу

Если вы хотите вставить макрос в свою книгу, выполните следующие обычные действия:

нажимать Alt + F11 , чтобы открыть редактор Visual Basic.
Щелкните правой кнопкой мыши ThisWorkbook на левой панели и выберите « Вставить» > « Модуль» в контекстном меню.
В появившемся окне (Окно кода) вставьте указанный выше код.

Более подробная инструкция описана в разделе Как вставить и запустить код VBA в Excel .

Кроме того, вы можете загрузить макрос в файле Excel, открыть его в этой книге (включить выполнение макросов, если будет предложено), а затем переключиться на свою собственную книгу и нажать Alt + F8 для его запуска. Если вы новичок в использовании макросов в Excel, следуйте подробным инструкциям ниже.

Как использовать макрос MergeExcelFiles

Откройте файл Excel, в котором вы хотите объединить листы из других книг, и выполните следующие действия:

Нажмите комбинацию Alt + F8, чтобы открыть окно диалога.
В разделе « Имя макроса» выберите MergeExcelFiles и нажмите «Выполнить».

Откроется стандартное окно проводника, вы выберите одну или несколько книг, которые хотите объединить, и нажмите «Открыть» . Чтобы выбрать несколько файлов , удерживайте нажатой клавишу Ctrl, указывая на их имена.

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

Как объединить несколько файлов с помощью Ultimate Suite.

Если вам не очень комфортно с VBA и вы ищете более простой и быстрый способ объединить файлы Excel, обратите внимание на инструмент «Копирование листов (Copy Sheets)» — одну из более чем 60 функций, включенных в невероятно функциональную программу Ultimate Suite for Excel. Она работает в версиях Excel 2010-2019.

С Ultimate Suite объединение нескольких файлов Эксель в один так же просто, как раз-два-три (буквально, всего 3 быстрых шага). Вам даже не нужно открывать те из них, которые вы хотите объединить. И это могут быть два файла или несколько — не важно.

Открыв главную книгу, перейдите на вкладку «Ablebits Data» и нажмите «Копировать листы (Copy Sheets)» > «Выбранные в одну книгу (Selected Sheets to one workbook)».

В диалоговом окне выберите файлы (а в них — листы), которые вы хотите объединить, и нажмите «Далее (Next)» .

Советы:

Чтобы выбрать все листы в определенной книге, просто поставьте галочку в поле рядом с именем книги, и все они в этом файле будут выбраны автоматически.
Чтобы объединить листы из закрытых книг, нажмите кнопку «Добавить файлы…» и выберите столько книг, сколько нужно. Это добавит выбранные файлы только в окно копирования, не открывая их в Excel.
По умолчанию копируются все данные. Однако, в разных листах можно выбрать разные диапазоны для объединения. Чтобы скопировать только определенную область, наведите указатель мыши на имя вкладки, затем щелкните значок и выберите нужный диапазон.
При необходимости укажите один или несколько дополнительных параметров и нажмите «Копировать» . На снимке скриншоте а ниже показаны настройки по умолчанию: Вставить все (формулы и значения) и Сохранить форматирование.

Дайте мастеру копирования листов несколько секунд для обработки и наслаждайтесь результатом!

На этой странице есть подробное описание всех возможностей работы мастера копирования.

Чтобы поближе познакомиться с этим и другими инструментами для Excel, вы можете загрузить ознакомительную версию Ultimate Suite.

Итак, я надеюсь, вы получили ответ на вопрос — как быстро объединить несколько файлов Excel в один.

Источник

Описание

Версия от 24.10.2021

Операционная система: Windows

Microsoft Excel 2007/2010/2013/2016/2019/365

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

Пошаговая инструкция по установке для различных версий Excel

Видео по работе с надстройкой

Для работы с надстройкой необходимо:

1. Скачать файл, который станет доступен для скачивания сразу после оплаты (порядок оплаты);

2. Установить надстройку, следуя пошаговой инструкции по установке для различных версий Excel;

3. Нажать кнопку вызова диалогового окна на вкладке «Надстройки»;

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

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

*В случае, если в надстройку будут вноситься какие-либо изменения или дополнения, то обновленную версию надстройки Вы будете получать бесплатно в течение одного года со дня покупки.

Отзывы

Alexander,
11.02.2019

Сравнил SheetStapler в работе с парой других известных российских надстроек: у SheetStapler конкурентов нет — т.к.при проверке выяснилось, что только у неё есть и работает автоматическая пакетная сборка книг и листов Excel в один файл. Спасибо за грамотную реализацию и сэкономленное время!

Павел,
31.12.2018

Добрый день!
Приобрел у Вас данную надстройку.
Спасибо Вам большое за проделанную работу.

Олеся,
07.11.2018

Большое спасибо разработчикам! Работает очень быстро, в пару кликов собрала 41 файл в один! Пожалуй приобрету ещё и другие надстройки для экономии времени. Отдельное спасибо за оперативную помощь в установке! Очень довольна сервисом!

Сергей,
19.10.2018

Спасибо, парни и девчонки, не знаю кто скрывается на другом конце. Вторую надстройку уже купил, вопросов нет. А те вопросы, что были, разработчики оперативно сняли.

Ruslan,
20.09.2018

Спасибо за программу!

Андрей,
06.12.2017

Купил, скачал надстройку, установил на Офис 2007, всё заработало с «полпинка». Не пожалел о покупке, сэкономило добрых 3-4 часа моего времени. Благодарен автору, за столь полезный инструмент.

Артём,
21.04.2016

Быстро собрал нужные листы из всех файлов в один. Понравилась функция «присвоить листам имена файлов». Это очень удобно) Спасибо!

Оставить отзыв

Источник

Как быстро объединить несколько файлов Excel

Мы рассмотрим три способа объединения файлов Excel в один: путем копирования листов, запуска макроса VBA и использования инструмента «Копировать рабочие листы» из надстройки Ultimate Suite.

обработать данные в файле намного проще, чем переключаться между книгами. Однако объединение нескольких книг Excel в один файл может быть сложным и трудоемким процессом, особенно если книги, которые необходимо объединить, содержат много листов. Так как же решить эту проблему? Будете ли вы копировать их вручную или с помощью кода VBA? Или вы используете один из специализированных инструментов для объединения файлов Excel?

Ниже вы найдете несколько хороших способов реализовать слияние.

Самый простой — скопировать вручную.
Комбинируйте файлы Excel с VBA.
Как объединить несколько файлов с Ultimate Suite.

Примечание. В этой статье мы расскажем, как скопировать листы из нескольких книг Excel в одну книгу. Если вы ищете быстрый способ скопировать данные с нескольких листов на общий лист, вы найдете подробные инструкции в другой статье: Как объединить несколько листов в один.

Простой метод — копировать листы руками.

Если вам просто нужно объединить пару файлов Excel, вы можете вручную скопировать или переместить листы из одного файла в другой. Вот как это сделать:

Откройте книги, которые мы планируем объединить.
Выберите листы в исходной книге, которые вы хотите скопировать в основную книгу.

Чтобы выбрать несколько листов, используйте один из следующих приемов:

Чтобы выбрать соседние листы, щелкните вкладку первого листа, который вы хотите скопировать, удерживайте нажатой клавишу Shift, затем щелкните вкладку последнего. Это действие выберет все листы между ними.
Чтобы выбрать несмежные, удерживайте клавишу Ctrl и щелкайте по каждой вкладке по отдельности.
Выделив все листы, щелкните правой кнопкой мыши одну из выделенных вкладок и выберите «Переместить или скопировать…» .

В диалоговом окне «Перемещение или копирование» выполните следующие действия:
- В раскрывающемся списке «Переместить выбранные листы в книгу» выберите целевую книгу, в которой вы хотите объединить другие файлы.
- Укажите, где именно должны быть вставлены карты. В нашем случае мы выбираем вариант, который будет включен в конец списка.
- Установите флажок «Создать копию», если вы хотите, чтобы исходные данные остались в исходном файле.
- Щелкните ОК, чтобы завершить операцию.

Чтобы объединить вкладки из нескольких файлов Excel, повторите описанные выше шаги для каждой книги отдельно.

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

Как объединить файлы Excel с VBA

Если у вас есть несколько файлов Excel, которые необходимо объединить в один файл, более быстрый способ — автоматизировать процесс с помощью макроса VBA.

Ниже вы найдете код VBA, который копирует все листы из всех выбранных файлов Excel в книгу. Этот макрос MergeExcelFiles написан Алексом.

Важная заметка! Макрос работает со следующим ограничением: объединяемые файлы не должны быть открыты физически или в памяти, в буфере обмена. В этом случае вы получите ошибку во время выполнения.

Sub MergeExcelFiles () Dim fnameList, fnameCurFile As Variant Dim countFiles, countSheets As Integer Dim wksCurSheet как рабочий лист Dim wbkCurBook, wbkSrcBook как рабочая книга fnameList = Application.GetOpenFilename (FileFilter: = «Microsoft xls», xls); Файлы Excel для объединения «, MultiSelect: = True) If (vbBoolean VarType (fnameList)) Then If (UBound (fnameList)> 0) Then countFiles = 0 countSheets = 0 Application.ScreenUpdating = False Application.Calculation = xlCalculationManual Set wbkCurBook = ActiveWorkbook для каждого fnameCurFile в fnameList countFiles = countFiles + 1 Set wbkSrcBook = Workbooks.Open (Имя файла: = f ForCurBookS .Sheets countSheets = countFogli.Sheets (wbk.CurBook) NextSheets SaveChaets: = False Next Applicationculation =ScreenUp Application. = xlCalculationBFutomatic & Msgcessed files «& v bCrLf &» Merged «& countSheets &» worksheets «, Title: =» Merge Excel file «End If Else MsgBox» None n selected file «, Title: =» Объединить файл Excel «End If End Sub

Как добавить этот макрос в книгу

Если вы хотите вставить макрос в свою книгу, выполните следующие обычные действия:

нажмите Alt + F11, чтобы открыть редактор Visual Basic.
Щелкните правой кнопкой мыши ThisWorkbook на левой панели и выберите в контекстном меню «Вставка»> «Форма.
В появившемся окне (Окно кода) вставьте указанный выше код.

Более подробные инструкции см. В разделе Как вставить и запустить код VBA в Excel .

Кроме того, вы можете загрузить макрос в файл Excel, открыть его в этой книге (при необходимости включить выполнение макроса), затем перейти к своей книге и нажать Alt + F8, чтобы запустить его. Если вы новичок в использовании макросов в Excel, следуйте подробным инструкциям ниже.

Как использовать макрос MergeExcelFiles

Откройте файл Excel, в котором вы хотите объединить листы из других книг, и выполните следующие действия:

Нажмите Alt + F8, чтобы открыть диалоговое окно.
В разделе «Имя макроса» выберите MergeExcelFiles и нажмите «Выполнить».

Откроется стандартное окно проводника, выберите одну или несколько книг, которые вы хотите объединить, и нажмите «Открыть». Чтобы выбрать несколько файлов, удерживайте клавишу Ctrl при вводе их имен.

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

Как объединить несколько файлов с помощью Ultimate Suite.

Если вам не очень нравится VBA и вы ищете более простой и быстрый способ объединить файлы Excel, воспользуйтесь инструментом Копирование листов, одной из более чем 60 функций, включенных в потрясающий Ultimate Suite for Excel. Работает в версиях Excel 2010-2019.

С Ultimate Suite объединить несколько файлов Excel в один так же просто, как один-два-три (буквально 3 быстрых шага). Вам даже не нужно открывать те, которые хотите объединить. И это может быть два и более файла, неважно.

Открыв главную бухгалтерскую книгу, перейдите на вкладку «Данные» в Ablebits и нажмите Копировать листы> Выбранные листы в книге)».

В диалоговом окне выберите файлы (а в них — листы), которые хотите объединить, и нажмите «Далее)» .

Совет:

Чтобы выбрать все листы в определенной книге, просто установите флажок рядом с названием книги, и все они в этом файле будут выбраны автоматически.
Чтобы объединить закрытые книжные листы, нажмите кнопку «Добавить файлы…» и выберите все нужные книги. Это только добавит выбранные файлы в окно копирования, но не откроет их в Excel.
По умолчанию все данные копируются. Однако на разных листах вы можете выбрать разные диапазоны для объединения. Чтобы скопировать только определенную область, наведите указатель мыши на название вкладки, затем щелкните значок и выберите нужный диапазон.
При необходимости укажите один или несколько дополнительных параметров и нажмите «Копировать». На следующем снимке экрана показаны настройки по умолчанию: Вставить все (формулы и значения) и Сохранить форматирование.

Дайте мастеру копирования несколько секунд на обработку и наслаждайтесь результатом!

Эта страница содержит подробное описание всех функций мастера копирования.

Чтобы ближе познакомиться с этим и другими инструментами Excel, вы можете загрузить пробную версию Ultimate Suite.

Итак, я надеюсь, что у вас есть ответ на свой вопрос: как быстро объединить несколько файлов Excel в один.

Источник

Содержание

1 Одновременная работа пользователей в одной книге
2 Объединение листов разных рабочих книг в одну
3 Объединение диапазонов значений из разных листов разных рабочих книг на отдельном листе
- 3.1 Другие материалы по теме:

Вам когда-нибудь приходилось сводить несколько таблиц Excel в одну? Самое неприятное в этом процессе, обычно, заключается в том, что эти таблицы могут содержать сразу по несколько листов внутри каждого файла. Есть ли решение данной проблемы? Сегодня вы об этом узнаете.

Объединим несколько файлов Excel в один, воспользовавшись силой скрипта VBA

Этот способ сделает все за вас, но только вам придется немного под напрячься. Хорошо, если у вас есть хоть какие-то навыки программиста. Но, если вы полный чайник в Excel и, вообще, в компьютере, то переходите ко второму способу, либо, будьте очень внимательными.

Итак, приступим.

Как и в методе «Как объединить несколько файлов Ворд в один», во-первых, прежде чем дать команду объединить несколько таблиц в одну в Excel, вам нужно эти таблицы собрать в одну отдельную папку. Посмотрите на скриншоте, как я это сделал.

Теперь запустим программу VBA. Прочитайте в «Запуск скрипта VBA в Word», потому что принцип в Excel тот же самый.

Теперь, когда вы готовы, вот сам код скрипта:

Sub GetSheets()   Path = "Укажите пусть до папки с файлами Excel"   Filename = Dir(Path & "*.xls")   Do While Filename  ""   Workbooks.Open Filename:=Path & Filename, ReadOnly:=True   For Each Sheet In ActiveWorkbook.Sheets   Sheet.Copy After:=ThisWorkbook.Sheets(1)   Next Sheet   Workbooks(Filename).Close   Filename = Dir()   Loop   End Sub

Прошу обратить внимание на две строчки.

Path = «Укажите пусть до папки с файлами Excel». Конечно, надпись в кавычках нужно заменить. Например, я заменил на … и вот, что у меня получилось: Path = » D:mrUnrealistDocumentsНовая папка»
Filename = Dir(Path & «*.xls»). В кавычках указан формат файла. В Excel их, обычно, два: .xls и .xlsx. Нажмите на файл правой кнопкой мыши и посмотрите «Свойства» файла. В скобках указан правильный тип файла.несколько таблиц в одну excel

Этот код подойдет, если нужно объединить все листы в один файл Эксель. Но, если вам необходимо объединить определенные листы некоторых файлов, переходите к следующему способу.

Функция «Переместить/скопировать» поможет объединить несколько листов Excel в один файл

В этом методе мы научимся копировать листы из одного файла Excel в другие.

Откройте все файлы, из которых вы собираетесь копировать листы, и тот файл (это может быть и новая пустая книга Эксель), в котором будут эти листы собраны.
Теперь откройте книгу, из которой будете копировать листы. Выберите те листы, которые вам нужны. Для множественного выбора держите зажатой клавиши CTRL (для выбора отдельных листов), либо SHIFT (для выбора всех вместе листов).
Нажмите по имени листа правой кнопкой мыши и в контекстном меню выберите пункт «Переместить/скопировать».
В окне «Переместить или скопировать» выберите из списка «Переместить выбранные листы в книгу» нужную вам книгу. Т.е. ту, где вы собираете все листы вместе. А в списке «Перед листом» укажите место, где эти листы будут вставлены.
Если вы не желаете, чтобы ваши листы пропали из открытой книги, поставьте галочку «Создать копию».
Нажмите на кнопку «ОК» и выбранные листы будут перемещены или скопированы.
Повторяйте со второго пункта до тех пор, пока вы не получите должного результата.

На этом все. Подписывайтесь, вступайте в группу вКонтакте или ОК, комментируйте, и не забывайте делиться с другими!

Оценка статьи:

(

votes, average:

out of 5)

Как объединить несколько файлов Excel в один Ссылка на основную публикацию

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

Одновременная работа пользователей в одной книге

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

Еще одним способом ускорить процесс сбора или обработки данных является разделение рабочей книги на отдельные листы с последующим их объединением после пользовательской обработки. О том как можно разделить рабочую книгу на отдельные листы и сохранить эти листы отдельными файлами мы уже рассказывали. Сейчас остановимся подробнее на том, как объединить их обратно.

Объединение листов разных рабочих книг в одну

Объединение разных файлов в один либо определенных листов в одну книгу имеет разнообразные решения. Это и стандартный вариант с копированием и вставкой листов в нужную книгу, и использование макросов, и установка дополнительных программ, специализирующихся на объединении файлов, таких например, как MergeExcel. У каждого из этих способов есть свои плюсы и свои минусы. Со своей стороны хочу предложить еще один способ решения задачи по объединению листов из разных книг в одну. Не разбираясь с программным кодом макросов и не устанавливая дополнительных программ, можно быстро расширить Excel новыми возможностями, используя дополнение, называемое надстройкой.

Надстройка по объединению различных файлов в один создана на основе макроса VBA, но выгодно отличается от него удобством в использовании. Надстройка легко подключается и запускается одним нажатием кнопки, выведенной прямо в главное меню, после чего появляется диалоговое окно. Далее все интуитивно понятно, выбираются файлы, выбираются листы этих файлов, выбираются дополнительные параметры объединения и нажимается кнопка «Пуск».

видео по работе с надстройкой

макрос (надстройка) для объединения нескольких файлов Excel в одну книгу

Надстройка позволяет:

1. Одним кликом мыши вызывать диалоговое окно макроса прямо из панели инструментов Excel;

2. выбирать файлы для объединения, а также редактировать список выбранных файлов;

3. объединять все листы выбранных файлов в одну рабочую книгу;

4. объединять в рабочую книгу только непустые листы выбранных файлов;

5. собирать в итоговую книгу листы с заданным именем (можно использовать маску при помощи спец. символов совпадения);

6. собирать в одну книгу листы выбранных файлов с определенным номером (индексом), либо диапазоном номеров;

7. собирать листы с определенным значением в заданном диапазоне ячеек;

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

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

Объединение диапазонов значений из разных листов разных рабочих книг на отдельном листе

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

Другие материалы по теме:

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

Открываем книгу, куда хотим собрать листы из других файлов, входим в редактор Visual Basic (ALT+F11), добавляем новый пустой модуль (в меню Insert — Module) и копируем туда текст вот такого макроса:

   Sub CombineWorkbooks()      Dim FilesToOpen      Dim x As Integer        Application.ScreenUpdating = False  'отключаем обновление экрана для скорости            'вызываем диалог выбора файлов для импорта      FilesToOpen = Application.GetOpenFilename _        (FileFilter:="All files (*.*), *.*", _        MultiSelect:=True, Title:="Files to Merge")        If TypeName(FilesToOpen) = "Boolean" Then          MsgBox "Не выбрано ни одного файла!"          Exit Sub      End If            'проходим по всем выбранным файлам      x = 1      While x

Источник

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

Следуйте инструкциям в этой статье, чтобы узнать все о различных способах объединения файлов Excel.

Копирование и вставка диапазонов ячеек из нескольких электронных таблиц
- Базовые функции копирования и вставки Excel
- Расширенные функции копирования и вставки Excel
  - Дополнительные параметры вставки в Excel
Объединение листов в файлах Excel с помощью параметра «Переместить или скопировать»
- Вариант консолидации
Сторонние надстройки, с которыми вы можете объединять файлы Excel
Объединение файлов Excel
- Share this post!

Копирование и вставка диапазонов ячеек из нескольких электронных таблиц

Старые добрые горячие клавиши Копировать (Ctrl + C) и Вставить (Ctrl + V) могут быть всем, что вам нужно для объединения файлов Excel. Вы можете скопировать диапазон ячеек на одном листе и вставить их в новый файл электронной таблицы. Excel включает в себя параметры копирования и вставки в своих меню. Для более сложной вставки Excel предлагает несколько параметров, таких как «Значения», «Формулы», «Сохранить ширину исходного форматирования» и некоторые другие.

Базовые функции копирования и вставки Excel

Копирование: откройте лист, из которого нужно скопировать ячейки, и выберите нужные ячейки. Удерживая левую кнопку мыши, перетащите курсор по диапазону ячеек, чтобы выделить его. Нажмите Ctrl + C, чтобы скопировать выделенную область листа. Вы также можете щелкнуть правой кнопкой мыши внутри ячеек и выбрать «Копировать».

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

Расширенные функции копирования и вставки Excel

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

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

Дополнительные параметры вставки в Excel

Копирование: откройте лист, из которого вы хотите скопировать ячейки, и выберите нужные ячейки. Щелкните левой кнопкой мыши и удерживайте при перетаскивании курсора по нужным ячейкам. Отпустите и нажмите Ctrl + C, чтобы скопировать все выделенные ячейки.

Вставка: откройте существующую или пустую электронную таблицу, чтобы вставить в нее скопированные ячейки. Щелкните правой кнопкой мыши и выберите «Специальная вставка» в контекстном меню. В этом примере ячейки вставляются с использованием ширины исходного источника. Обратите внимание, что опция расширенной вставки показывает предварительный просмотр результатов вставки при наведении курсора.

Подтвердите, что изменения вам нужны. Чтобы сравнить различия до и после, вы можете использовать функции Undo и Redo.

Параметр вкладки «Переместить или скопировать» — это тот, который вы можете выбрать, чтобы скопировать полные листы в другую электронную таблицу Excel. Таким образом, вы можете копировать или перемещать многочисленные листы из разных файлов в одну электронную таблицу. Этот параметр не позволяет выбирать диапазоны ячеек, но подходит для объединения полных листов.

Откройте файлы, которые вы хотите переместить, и электронную таблицу, в которую их нужно скопировать, а затем щелкните правой кнопкой мыши вкладку листа в нижней части окна Excel и выберите «Переместить или скопировать».

Выберите лист (книгу), на который вы хотите переместить файл, используя раскрывающийся список, и установите флажок «Создать копию», чтобы скопировать выбранный лист. Если этот параметр не выбран, лист перемещается из одной электронной таблицы в другую.

Нажмите кнопку OK, чтобы закрыть окно. Теперь электронная таблица, которую вы выбрали для перемещения, также будет включать лист. На вкладке листа есть (2), чтобы подчеркнуть, что это вторая копия.

Вариант консолидации

В Excel есть встроенный параметр «Объединить», который вы можете выбрать, чтобы объединить более конкретные диапазоны ячеек из альтернативных электронных таблиц в один рабочий лист. Это отличный вариант для объединения данных в форматы табличных списков. Диапазоны данных в отдельных электронных таблицах должны быть в формате списка с таблицами, которые имеют заголовки столбцов и строк, как показано ниже, что является макетом таблицы базы данных.

Сначала откройте документы, содержащие данные, которые необходимо консолидировать, и пустую электронную таблицу, в противном случае — основной рабочий лист, который будет включать объединенные диапазоны ячеек.

Перейдите на вкладку «Данные» и выберите параметр «Консолидировать».

Затем убедитесь, что в раскрывающемся меню «Функция» выбрана «Сумма», затем щелкните текстовое поле «Ссылка» и введите файл электронной таблицы, содержащий диапазон ячеек, который необходимо объединить, или выберите его в параметре «Обзор». Затем выбранный путь к файлу включается в поле «Ссылка».

Когда вы выбрали все необходимые диапазоны ячеек из других файлов электронной таблицы, выберите Верхнюю строку, Левый столбец и Создать ссылки на параметры исходных данных в окне Консолидация. Нажмите OK, чтобы создать рабочий лист консолидации. Затем откроется один лист, объединяющий все диапазоны ячеек из выбранных файлов электронных таблиц.

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

Сторонние надстройки, с которыми вы можете объединять файлы Excel

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

Мастер консолидации рабочих листов — это стороннее дополнение, с помощью которого вы можете комбинировать, консолидировать и присоединять рабочие листы из нескольких файлов Excel. Надстройка продается по цене 23,95 фунтов стерлингов на Веб-сайт Ablebits.comи он совместим со всеми последними версиями Excel, начиная с 2007 года.

Kutools — это надстройка для Excel, которая включает в себя множество инструментов. Комбинатор — это инструмент в Kutools, с помощью которого вы можете объединить несколько листов из альтернативных файлов Excel в одну электронную таблицу. Это позволяет вам настроить электронную таблицу, содержащую ссылки на все объединенные рабочие листы, как показано на снимке экрана ниже. Этот Kutools для страницы Excel предоставляет дополнительную информацию о дополнении.

Объединение файлов Excel

Таким образом, вы можете объединять и комбинировать файлы Excel с помощью параметров «Копировать и вставить», «Объединить и переместить» или «Копировать» или сторонних надстроек. С помощью этих опций и инструментов вы можете объединить несколько листов из нескольких файлов Excel в одну электронную таблицу и объединить их диапазоны ячеек.

Что вы думаете об этой статье?

Источник