Урок за Excel: Комбинирайте няколко работни книги/работни листове в една
В Excel комбинирането на листове е обичайна, но донякъде трудна задача за повечето потребители на Excel, особено за зелените ръце. Ето този урок, изброяващ почти всички сценарии на комбиниране, с които може да се сблъскате, и предлага относителни професионални решения за вас. Можете бързо да намерите отговора, като щракнете върху връзката в навигационния списък по-долу, или можете да научите уменията за комбиниране, като следвате връзките по-долу една по една, ако се интересувате.
В Excel комбинирането може да бъде категоризирано в два типа, единият е комбиниране само на съдържание, другият е комбиниране на съдържание и извършване на някои изчисления.
Забележка
В този урок създавам някои листове и данни за по-добро обяснение на методите, можете да промените препратките според нуждите си, когато използвате по-долу VBA код или формули, или можете да изтеглите примерите за изпробване на методи директно.
Комбинирайте съдържанието
Ето една работна книга с 4 листа, които трябва да бъдат комбинирани в един лист.
Кликнете, за да изтеглите примерния файл
1.1 Комбинирайте всички листове в един лист с VBA код
В Excel, с изключение на традиционния метод – копиране и поставяне, можете да използвате VBA код за бързо обединяване на всички листове в един лист.
1. Натиснете F11 намлява Друг клавиши за активиране на Microsoft Visual Basic за приложения прозорец.
2. След това щракнете върху изскачащия прозорец Поставете > Модули за да поставите нов празен модул.
3. Копирайте и поставете кода по-долу в новия модул.
VBA: Комбинирайте всички листове в един
Sub CombineAllSheetsIntoOneSheet()
'UpdatebyExtendoffice
Dim I As Long
Dim xRg As Range
On Error Resume Next
Worksheets.Add Sheets(1)
ActiveSheet.Name = "Combined"
For I = 2 To Sheets.Count
Set xRg = Sheets(1).UsedRange
If I > 2 Then
Set xRg = Sheets(1).Cells(xRg.Rows.Count + 1, 1)
End If
Sheets(I).Activate
ActiveSheet.UsedRange.Copy xRg
Next
End Sub
В горния код скриптът „Комбиниран“ е името на листа, който поставя комбинираното съдържание, можете да промените този скрипт на друг, както ви е необходимо.
4. Натисни F5 за стартиране на кода, лист с име Combined е създаден в предната част на всички листове, за да постави съдържанието на всички листове.
1.2 Комбинирайте всички таблици или наименувани диапазони с Query (Excel 2016 или по-нови версии)
Ако работите в Excel 2016 или по-нови версии, функцията Query ви позволява да комбинирате всички създадени таблици или именувани диапазони в една наведнъж.
Кликнете, за да изтеглите примерния файл
Първо се уверете, че диапазоните са създадени като таблици или именувани диапазони, за създаване на таблица и именуван диапазон, моля, вижте Как да конвертирате диапазон в таблица или обратно в Excel намлява Дефинирайте и използвайте имена във формули.
1. Отворете работната книга, в която искате да обедините всички листове, щракнете Дата > Нова заявка > От други източници > Празна заявка.
2. В появилото се Редактор на заявки прозорец, отидете на лентата с формули, въведете формулата по-долу в нея.
=Excel.CurrentWorkbook()
Натискане Въведете ключ, всички таблици в текущата работна книга са изброени.
3. Щракнете върху бутона за разширяване до съдържание и проверете Разширете опция и Изберете Всички колони отметката.
4. кликване OK. Всички маси са изброени една по една.
Можете да щракнете с десния бутон върху заглавката на колона, за да извършите други операции в избраната колона.
5. След това кликнете досие > Затваряне и зареждане в....
6. В Зареждане до диалог, проверка Маса опция, след което изберете местоположението, от което се нуждаете, за да заредите комбинираната таблица в Изберете къде да се заредят данните раздел, кликнете върху Натоварване.
Сега се създава нов лист за поставяне на всички обединени таблици.
1.3 Комбинирайте всички листове в един лист с удобен инструмент
Ако горните методи не ви удовлетворяват, можете да опитате полезен и удобен инструмент, Kutools за Excel. Негов Комбинирам функцията е мощна, която не само може да комбинира всички листове в един лист, но също така може да изпълнява разширени комбинирани задачи, като комбиниране на листове в една работна книга, комбиниране на листове с едно и също име, комбиниране само на избрани листове, комбиниране на листове във файлове и т.н.
1. Активирайте работната книга, чиито листове искате да комбинирате, щракнете Kutools плюс > Комбинирам. Изскача диалогов прозорец, за да ви напомни за някои бележки относно паролата, ако работните книги, които искате да използвате, не се докосват до парола, просто щракнете OK да продължи.
2. В Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в един работен лист опция, щракнете Напред бутон.
3. В Стъпка 2 на 3 прозорец, по подразбиране текущата работна книга е посочена и маркирана в Списък с работни книги прозорец и всички листове на текущата работна книга са изброени и проверени в Списък с работни листове панел, щракнете върху Напред да продължи.
Забележка: ако сте отворили няколко работни книги, всички отворени работни книги са изброени в списъка с работни книги, моля, маркирайте само работната книга, която искате да използвате.
4. В последната стъпка изберете режима на комбиниране, както ви е необходим, можете да изберете Комбинирайте по ред or Комбинирайте по колона; след това посочете други опции, ако имате нужда. Кликнете завършеност бутон.
5. Изскача диалогов прозорец, за да изберете една папка, в която да поставите комбинираната работна книга, можете да я преименувате в Име на файл лента, щракнете Save да свърша.
6. Сега всички листове са комбинирани заедно и се появява диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете върху Да or Не както искаш.
Изскача нова работна книга с посочения резултат от комбинирането, щракнете върху връзката на Изходен файл, за да проверите комбинирания лист.
Комбинирайте по ред
Комбинирайте по колона
1.4 Разширение за комбиниране на листове в един лист
1.41 С удобен инструмент само за комбиниране на избраните листове в един лист
Ако искате само да комбинирате някои листове в работна книга в един лист, няма вградена функция в Excel, която да го постигне. Но на Комбинирам функция на Kutools за Excel мога да го направя.
1. Активирайте работната книга, която използвате, и щракнете Kutools плюс > Комбинирам > OK за да активирате съветника за комбиниране.
2. В Стъпка 1 на 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в един работен лист опция, щракнете Напред бутон.
3. В прозореца Стъпка 2 от 3 по подразбиране текущата работна книга е посочена и маркирана в панела със списък с работни книги и всички листове на текущата работна книга са изброени и маркирани в панела със списък с работни листове, премахнете отметките от листовете, които правят не е необходимо да се комбинират, щракнете върху Напред, за да продължите.
4. В последната стъпка задайте необходимите опции. Кликнете завършеност бутон.
5. Изскача диалогов прозорец, за да изберете една папка, в която да поставите комбинираната работна книга, можете да я преименувате в Име на файл лента, щракнете Save да свърша.
6. Сега само отметнатите листове са комбинирани заедно и се появява диалогов прозорец, за да ви попита дали да запазите настройките като сценарий, щракнете върху Да or Не както искаш.
1.42 С удобен инструмент за комбиниране на листове от множество работни книги в един лист
Например искате да комбинирате всички листове от book1, book2 и book3 в един лист, както е показано на екранната снимка по-долу, Комбинирам функция на Kutools за Excel също може да ви помогне.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте работните книги, които използвате, и щракнете Kutools плюс > Комбинирам > OK за да активирате Комбинирам съветника.
2. В Стъпка 1 на 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в един работен лист опция, щракнете Напред бутон.
3. В Стъпка 2 на 3 прозорец, всички отворени работни книги са изброени и проверени в Списък с работни книги прозорец и всички листове с отворени работни книги са изброени и проверени в Списък с работни листове панел, щракнете върху Напред да продължи.
Съвет: ако искате да добавите работни книги за комбиниране, щракнете върху бутона Добавяне, за да изберете път за добавяне на работни книги.
4. В последната стъпка изберете опциите, от които се нуждаете. Кликнете завършеност бутон.
5. Изскача диалогов прозорец, за да изберете една папка, в която да поставите комбинираната работна книга, можете да я преименувате в Име на файл лента, щракнете Save да свърша.
6. Сега всички листове в отворените работни книги са комбинирани заедно и се появява диалогов прозорец, за да ви попита дали да запазите настройките като сценарий, щракнете върху Да or Не както искаш.
Отворете комбинираната работна книга, която сте запазили, листовете в работните книги са обединени в един лист.
Ето три работни книги, необходими за комбиниране в една работна книга.
клозет | февруари | Вт |
2.1 Комбинирайте работни книги в една работна книга чрез командата Преместване или Копиране
Само за комбиниране на листове в няколко работни книги, Excel's Преместване или копиране командването може да ви направи услуга.
1. Отворете първите две работни книги, които искате да комбинирате, активирайте първата работна книга, изберете листовете, които искате да преместите и след това щракнете с десния бутон, за да активирате контекстното меню, и щракнете върху Преместване или копиране.
Съвети
1) Щракнете с десния бутон върху един раздел и изберете Изберете Всички листове от контекстното меню първо, ако искате да преместите всички листове, след това използвайте Преместване или копиране команда.
2) Холдинг Ctrl клавиш за избиране на множество несъседни листа.
3) Изберете първия лист и задръжте Превключване клавиш за избор на последния лист за избор на няколко съседни листа.
2. В Преместване или копиране в диалоговия прозорец Резервирам падащ списък, изберете работната книга, в която искате да преместите листовете, тук изберете януари, след което посочете местоположението, в което искате да поставите листовете Преди лист раздел, кликнете върху OK.
Забележка:
1) По-добре проверете Създайте копие, или оригиналната работна книга ще загуби работния лист след преместване.
2) Ако искате да поставите всички работни книги в нова работна книга, изберете (нова книга) in Резервирам падащ списък.
Как листовете са преместени в основната работна книга.
Повторете горните стъпки, за да преместите всички работни книги в една.
2.2 Комбинирайте няколко работни книги (в една папка) в една работна книга с VBA код
За да комбинирате много работни книги, които всички са в една папка, можете да използвате VBA код.
1. Активирайте работната книга, в която искате да обедините всички работни книги, след което натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. В изскачащия прозорец щракнете върху Поставете > Модули за да поставите нов празен модул.
3. Копирайте и поставете по-долу VBA кода в новия модул.
VBA: Комбинирайте множество работни книги в текуща работна книга
Sub GetSheets()
'Updated by Extendoffice
Path = "C:\Users\AddinTestWin10\Desktop\combine sheets\combine sheets into one workbook\"
Filename = Dir(Path & "*.xlsx")
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
Забележка
В кода на VBA скриптът "C:\Users\AddinTestWin10\Desktop\комбиниране на листове\комбиниране на листове в една работна книга\" е пътят на папката, където се намират работните книги, които искате да комбинирате, моля, променете го, за да отговаря на вашите нужди.
Ако работните книги, които искате да обедините, са в различни папки, първо ги копирайте в една папка.
4. Натиснете F5 за изпълнение на кода, тогава всички работни книги са копирани в края на текущата работна книга.
Съвет: всички копирани листове ще използват оригиналното си име, ако искате да използвате името на работната книга като префикс, моля, използвайте кода по-долу:
Sub MergeWorkbooks()
'Updated by Extendoffice
Dim xStrPath As String
Dim xStrFName As String
Dim xWS As Worksheet
Dim xMWS As Worksheet
Dim xTWB As Workbook
Dim xStrAWBName As String
On Error Resume Next
xStrPath = "C:\Users\AddinTestWin10\Desktop\combine sheets\combine sheets into one workbook\"
xStrFName = Dir(xStrPath & "*.xlsx")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xTWB = ThisWorkbook
Do While Len(xStrFName) > 0
Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
xStrAWBName = ActiveWorkbook.Name
For Each xWS In ActiveWorkbook.Sheets
xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.Count)
Set xMWS = xTWB.Sheets(xTWB.Sheets.Count)
xMWS.Name = xStrAWBName & "(" & xMWS.Name & ")"
Next xWS
Workbooks(xStrAWBName).Close
xStrFName = Dir()
Loop
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
Понякога може да искате да комбинирате всички работни книги в различни папки в една работна книга. Например, за да комбинирате всички работни книги в папка 2020 и 2021 в една работна книга, няма директен начин в Excel да може да се справи с това.
Въпреки това, Комбинирам функция на Kutools за Excel предоставя опция за комбиниране на работни книги в множество папки в една.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте Excel, щракнете Kutools плюс > Комбинирам, Изскача диалогов прозорец, за да ви напомни за някои бележки относно паролата, ако работните книги, които искате да използвате, не се докосват до парола, просто щракнете OK да продължи.
2. В Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в една работна книга опция, щракнете Напред бутон.
3. В Стъпка 2 на 3 прозорец, щракнете върху стрелката до Добави бутон, за да се покаже падащото меню, щракнете Папка.
4. След това в Изберете папка изберете една папка, която искате да използвате, щракнете Изберете папка да го добавите Списък с работни книги раздел.
5. Повторете горната стъпка, за да добавите всички папки и да изброите всички работни книги в Списък с работни книги, Щракнете върху Напред.
6. В последната стъпка изберете необходимите опции. Кликнете завършеност бутон.
7. Изскача диалогов прозорец, за да изберете една папка, в която да поставите комбинираната работна книга, можете да я преименувате в Име на файл лента, щракнете Save да свърша.
8. Сега всички листове са комбинирани заедно и се появява диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете върху Да or Не както искаш.
Изскача нова работна книга, която изброява резултата от комбинирането, щракнете върху връзката на Изходен файл, за да проверите комбинирания лист.
Комбинирайте резултата
Забележка: в комбинираната работна книга първият лист с име Kutools за Excel изброява информация за оригинални работни листове и окончателни комбинирани листове, можете да го изтриете, ако не ви е необходим.
Ако искате да комбинирате само някои листове от работни книги в една работна книга, а не всички листове от всяка работна книга, можете да опитате методите по-долу.
четвърт-1.xlsx четвърт-2.xlsx четвърт-3.xlsx
1. Отворете работна книга, за да намерите комбинираните работни листове, след което натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. В изскачащия прозорец щракнете върху Поставете > Модули за да поставите нов празен модул.
3. Копирайте и поставете по-долу VBA кода в новия модул.
VBA: Комбинирайте конкретни листове от множество работни книги в текущата работна книга
Sub MergeSheets2()
'Updated by Extendoffice
Dim xStrPath As String
Dim xStrFName As String
Dim xWS As Worksheet
Dim xMWS As Worksheet
Dim xTWB As Workbook
Dim xStrAWBName As String
Dim xI As Integer
On Error Resume Next
xStrPath = "C:\Users\AddinTestWin10\Desktop\combine sheets\combine specific sheets from multiple workbooks\"
xStrName = "A,B"
xArr = Split(xStrName, ",")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xTWB = ThisWorkbook
xStrFName = Dir(xStrPath & "*.xlsx")
Do While Len(xStrFName) > 0
Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
xStrAWBName = ActiveWorkbook.Name
For Each xWS In ActiveWorkbook.Sheets
For xI = 0 To UBound(xArr)
If xWS.Name = xArr(xI) Then
xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.Count)
Set xMWS = xTWB.Sheets(xTWB.Sheets.Count)
xMWS.Name = xStrAWBName & "(" & xArr(xI) & ")"
Exit For
End If
Next xI
Next xWS
Workbooks(xStrAWBName).Close
xStrFName = Dir()
Loop
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
Забележка
1) В кода на VBA, скриптът " C:\Users\AddinTestWin10\Desktop\комбиниране на листове\комбиниране на конкретни листове от множество работни книги\" е пътят, където се намират работните книги, които искате да комбинирате, моля, променете го, за да отговаря на вашите нужди.
2) В кода на VBA, скриптът "A, B" са имената на листовете на конкретните листове, които искам да комбинирам заедно от работни книги, променете ги според нуждите си, като използвате запетаи, за да разделите всяко име на лист.
3) Ако работните книги, които искате да обедините, са в различни папки, първо ги копирайте в една папка.
4. Натиснете F5 за изпълнение на кода, тогава само конкретните работни листове са копирани в края на текущата работна книга.
Ако работните книги, които искате да комбинирате, са в много различни папки, можете да опитате Kutools за ExcelЕ Комбинирам функция.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте Excel, щракнете Kutools плюс > Комбинирам, Изскача диалогов прозорец, за да ви напомни за някои бележки относно паролата, ако работните книги, които искате да използвате, не засягат паролата, просто щракнете OK да продължи.
2. В Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в една работна книга опция, щракнете Напред бутон.
3. В Стъпка 2 на 3 прозорец, щракнете върху стрелката до Добави бутон, за да се покаже падащото меню, щракнете Папка.
4. След това в Изберете папка изберете една папка, която искате да използвате, щракнете Изберете папка да го добавите Списък с работни книги раздел.
5. Повторете горната стъпка, за да добавите всички папки и да изброите всички работни книги в Списък с работни книги.
6. След това останете вътре Стъпка 2 на 3 прозорец, изберете една работна книга в Списък с работни книгии отбележете само листовете, в които искате да използвате Списък с работни листове, след това щракнете Същият лист бутон. Сега всички листове с едно и също име на работните книги в Списък с работни книги са проверени. Кликнете Напред да продължи.
7. В последната стъпка изберете необходимите опции. Кликнете завършеност бутон.
8. Изскача диалогов прозорец, за да изберете една папка, в която да поставите комбинираната работна книга, можете да я преименувате в Име на файл лента, щракнете Save да свърша
9. Сега конкретните листове са комбинирани заедно и се появява диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете върху Да or Не както искаш.
Изскача нова работна книга, която изброява резултата от комбинирането, щракнете върху връзката на Изходен файл, за да проверите комбинирания лист.
Комбинирайте резултата
Забележка: в комбинираната работна книга първият лист с име Kutools за Excel изброява информация за оригинални работни листове и окончателни комбинирани листове, можете да го изтриете, ако не ви е необходим.
Както е показано на екранната снимка по-долу, има две таблици в два листа, искате да комбинирате тези две таблици в една въз основа на една ключова колона в Excel.
Table1 | Table2 |
Комбинирана маса |
- Запитване функцията в Excel 2016 или по-нови версии е много мощна, поддържа комбиниране на две таблици въз основа на ключова колона.
Преди да използвате Запитване уверете се, че диапазоните, които искате да комбинирате, са създадени като таблици.
combine-two-tables-based-on-a-key-column-query.xlsx
1. Щракнете върху която и да е клетка от първата таблица, щракнете Дата > От таблица в Вземете и трансформирайте група.
2. В Редактор на заявки кликнете върху досие > Затваряне и зареждане Да се команда. Вижте екранна снимка:
3. След това в изскочилото Зареждане до диалог, проверка Само създаване на връзка опция. Кликнете Натоварване.
Сега можете да видите Запитвания за работна книга показване на панел и таблицата е посочена в панела като връзка.
Повторете горните стъпки, за да добавите втората таблица към Запитвания за работна книга панел.
4. След това кликнете Дата > Нова заявка > Комбинирайте заявки > Обединяване.
5. В Обединяване прозорец, изберете двете таблици, които искате да комбинирате в двата падащи списъка поотделно. Таблицата в долната част ще бъде комбинирана в таблицата по-горе.
6. Щракнете върху ключовата колона, въз основа на която искате да комбинирате две таблици, щракнете OK.
7. В Merge1 – Редактор на заявки изскочи прозорец, щракнете върху бутона за разгъване до Нова колона, след това поставете отметка във всички колони с изключение на ключовата колона, премахнете отметката Използвайте оригиналното име на колона като префикс отметка, щракнете OK.
Сега две таблици са обединени в една въз основа на посочената ключова колона.
8. кликване досие > Затвори и зареди в, В Зареждане до диалог, проверка Маса опция и посочете местоположението, което искате да заредите. Кликнете Натоварване.
Сега двете таблици са обединени въз основа на ключова колона.
4.2 Комбинирайте два листа въз основа на една ключова колона с помощта на функции на Excel
Ако искате само да преместите една или две колони от един лист в друг и да намерите въз основа на ключова колона, функциите на Excel могат да ви помогнат.
Например, преместете пълните данни от лист 2 в лист 1 и въз основа на колона A, за да намерите данните.
combine-two-sheets-based-on-a-key-column-functions.xlsx
Sheet1 | Sheet2 |
4.21 Комбинирайте два листа с колона с VLOOKUP
1. Копирайте и поставете формулата по-долу до таблицата в лист 1:
=VLOOKUP(A2,Лист2!$A$2:$B$5,2,НЕВЯРНО)
Обяснение:
A2: първата стойност за търсене (ключова колона);
Sheet2!$A$2:$B$5: масивът от таблици, таблицата съдържа две или повече колони, където се намират колоната със стойност за търсене и колоната със стойност на резултата;
2: индексът на колоната, конкретният номер на колона (той е цяло число) на table_array, от който ще върнете съответстващата стойност.
2. Натиснете Въведете ключ за получаване на първия резултат.
3. След това плъзнете манипулатора за автоматично попълване надолу, за да попълните с всички данни.
4. Дръжте клетките с формули маркирани, щракнете Начало и отидете, за да форматирате клетките, както ви е необходимо в Телефон за връзка: група.
За повече информация относно функцията VLOOKUP, щракнете тук.
4.22 Комбинирайте два листа с колона с формула, комбинирайте функциите MATCH и INDEX
1. Копирайте и поставете формулата по-долу до таблицата в лист 1:
=INDEX(Sheet2!$B$2:$B$5,MATCH(Sheet1!A2,Sheet2!$A$2:$A$5,0))
Обяснение:
Sheet2!$B$2:$B$5: колоната със съответстващата стойност, която искате да намерите;
Sheet1!A2: първата стойност за търсене (в ключовата колона);
Sheet2!$A$2:$A$5: ключовата колона, на базата на която искате да комбинирате два листа.
2. Натиснете Въведете ключ за получаване на първия резултат.
3. След това плъзнете манипулатора за автоматично попълване надолу, за да попълните с всички данни.
4. Дръжте клетките с формули маркирани, щракнете Начало и отидете, за да форматирате клетките, както ви е необходимо в Телефон за връзка: група.
За повече информация относно INDEX.
За повече информация относно MATCH.
4.3 Комбинирайте два листа на базата на една ключова колона с удобен инструмент
Освен функцията за комбиниране, има още една мощна функция – Обединяване на таблици in Kutools за Excel, който може бързо и лесно да комбинира два листа на базата на една ключова колона.
combine-two-sheets-based-on-a-key-column-handy-tool.xlsx
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. кликване Kutools плюс >Обединяване на таблици.
2. В Тпозволява сливане – стъпка 1 от 5 прозорец, изберете диапазоните на таблицата в Изберете основната таблица намлява Изберете таблицата за справка раздел отделно, щракнете Напред.
3. В Стъпка 2 на 5 прозорец, проверете ключовата колона, въз основа на която искате да комбинирате, щракнете Напред.
4. В Стъпка 3 на 5 прозорец, можете да проверите колоните, които искате да актуализирате данните въз основа на справочната таблица, ако не се нуждаете от актуализиране на данни, просто щракнете директно Напред.
5. В Стъпка 4 на 5 прозорец, тук отметнете колоните, които искате да комбинирате към главната таблица, след което щракнете Напред.
6. В последната стъпка задайте необходимите опции, щракнете върху завършеност.
Тази функция поддържа комбиниране на два листа в различни работни книги.
Да предположим, че има две таблици в sheet1 и sheet2 отделно, сега, за да преместите данните в колона End_Dates от sheet2 към sheet1 въз основа на колоната Project и колоната Start_Date, както е показано на екранната снимка по-долу:
Sheet1 | Sheet2 |
Комбиниран лист |
Кликнете, за да изтеглите примерния файл
В Excel вградените функции не поддържат тази операция, но Обединяване на таблици of Kutools за Excel може да се справи.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. кликване Kutools плюс > Обединяване на таблици.
2. В Обединяване на таблици – Стъпка 1 от 5 прозорец, изберете диапазоните на таблицата в Изберете основната таблица намлява Изберете таблицата за търсенеe раздел отделно, щракнете Напред.
3. В Стъпка 2 на 5 прозорец, маркирайте двете ключови колони, въз основа на които искате да комбинирате, щракнете Напред.
Забележка: автоматично свързаните колони в справочната таблица ще бъдат съпоставени, можете да щракнете върху името на колоната в колоните на справочната таблица, за да ги промените според нуждите си.
4. В Стъпка 3 на 5 прозорец, можете да проверите колоните, които искате да актуализирате данните въз основа на справочната таблица, ако не се нуждаете от актуализиране на данни, просто щракнете директно Напред.
5. В Стъпка 4 на 5 прозорец, тук отметнете колоните, които искате да комбинирате към главната таблица, след което щракнете Напред.
6. В последната стъпка задайте необходимите опции, щракнете върху завършеност.
След това колоните, които искате да добавите, са добавени в края на главната таблица.
Тази функция поддържа комбиниране на два листа в различни работни книги.
За да комбинирате няколко листа с една и съща заглавка, както е показано на екранната снимка по-долу:
Комбиниран лист |
Кликнете, за да изтеглите примерния файл
6.1 Комбинирайте всички листове с еднакви заглавки с помощта на VBA
Има код на VBA, който може да комбинира всички листове на работна книга с еднакви заглавки.
1. Активирайте работната книга, която искате да обедините работни листове със същата заглавка, след което натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. В изскачащия прозорец щракнете върху Поставете > Модули за да поставите нов празен модул.
3. Копирайте и поставете по-долу VBA кода в новия модул.
VBA: Комбинирайте листове с една и съща заглавка
Sub Combine()
'Update by Extendoffice
Dim i As Integer
Dim xTCount As Variant
Dim xWs As Worksheet
On Error Resume Next
LInput:
xTCount = Application.InputBox("The number of title rows", "", "1")
If TypeName(xTCount) = "Boolean" Then Exit Sub
If Not IsNumeric(xTCount) Then
MsgBox "Only can enter number", , "Kutools for Excel"
GoTo LInput
End If
Set xWs = ActiveWorkbook.Worksheets.Add(Sheets(1))
xWs.Name = "Combined"
Worksheets(2).Range("A1").EntireRow.Copy Destination:=xWs.Range("A1")
For i = 2 To Worksheets.Count
Worksheets(i).Range("A1").CurrentRegion.Offset(CInt(xTCount), 0).Copy _
Destination:=xWs.Cells(xWs.UsedRange.Cells(xWs.UsedRange.Count).Row + 1, 1)
Next
End Sub
4. Натисни F5 за да стартирате кода, изскача диалогов прозорец, за да ви попита за броя на заглавните редове, въведете числото в текстовото поле. Кликнете OK.
Сега всички листове в тази работна книга са комбинирани в нов лист, наречен Комбиниран.
6.2 Комбинирайте листове с еднакви заглавки с помощта на удобен инструмент
- Комбинирам функция на Kutools за Excel също може да се справи с тази работа и поддържа комбиниране на листове в работни книги.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте работната книга, която искате да комбинирате листове с еднакви заглавки, щракнете Kutools плюс > Комбинирам.
2. Изскача диалогов прозорец, за да ви напомни нещо за паролата, ако работната книга(ите), които използвате, не включва пароли, щракнете върху OK продължавам. В изскачането Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в един работен лист опция, щракнете Напред.
3. В Стъпка 2 на 3 прозорец, всички листове са изброени и регистрирани Списък с работни листове раздел, кликнете върху Напред да продължиш.
Съвет:
1) Ако искате да комбинирате само някои листове, просто маркирайте имената на листовете, от които се нуждаете, и оставете други без отметка.
2) Ако искате да добавите още работни книги за комбиниране, щракнете Добави за добавяне на файлове или папки в Списък с работни книги раздел.
4. В Стъпка 3 на 3, Проверете Комбинирайте по ред опция и въведете броя на заглавните редове в Брой заглавни редове текстово поле, задайте други настройки, ако имате нужда. Кликнете завършеност.
5. Изберете папка и дайте име за новата работна книга в Посочете името на файла и местоположението за комбинираната работна книга кликнете върху Save.
6. Изскача диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете Да or Не за нуждите ви. Изскача работна книга, за да посочи оригиналната работна книга и връзките към новата работна книга, щракнете върху връзката към пътя на новата работна книга, за да я отворите за проверка.
Консолидиране
Например, има три листа с еднакви заглавки на редове и заглавки на колони, сега искате да ги комбинирате с еднакви заглавки и да сумирате данните, както са показани екранните снимки по-долу.
Резултат |
Кликнете, за да изтеглите примерния файл
1.1 Комбинирайте листове и правете изчисления с функцията за консолидиране
В Excel, Консолидиране поддържа функция за комбиниране на листове и извършване на изчисления.
1. Активирайте работната книга, чиито листове искате да комбинирате, и изберете клетка, в която искате да поставите комбинираните данни, щракнете върху Дата > Консолидиране.
2. В Консолидиране диалогов прозорец, направете настройките по-долу:
1) В функция от падащото меню изберете изчислението, което искате да направите след комбиниране на листове.
2) Щракнете върху иконата за избор до паса бутон, за да изберете диапазона, който да комбинирате, и щракнете Добави към Всички препратки раздел.
Повторете тази стъпка, за да добавите всички диапазони, които трябва да бъдат комбинирани в Всички препратки раздел.
3) В Използвайте етикети в раздел, проверете Горния ред намлява Лявата колона квадратчета за отметка, ако диапазоните имат както заглавка на ред, така и заглавка на колона.
4) Ако искате комбинираното съдържание да се променя с промяната на изходните данни, проверете Създайте връзки към изходни данни отметката.
3. кликване OK. Диапазоните са комбинирани и сумирани въз основа на заглавки.
Забележка: ако диапазоните, които искате да комбинирате, са в други работни книги, щракнете върху Преглед в диалоговия прозорец Консолидиране, за да изберете работната книга, след което въведете името на листа и диапазона в текстовото поле и щракнете върху Добавяне, за да добавите диапазона към секцията Всички препратки.
1.2 Комбинирайте листове и правете изчисления с удобен инструмент
- Комбинирам функция на Kutools за Excel поддържа комбиниране на листове в множество работни книги и извършване на изчисления в един лист.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте работната книга(ите), която искате да консолидирате, щракнете Kutools плюс > Комбинирам.
2. Изскача диалогов прозорец, за да ви напомни нещо за паролата, ако работната книга(ите), които използвате, не включва пароли, щракнете върху OK продължавам. В изскачането Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Консолидирайте и изчислявайте стойности в множество работни книги в един работен лист опция, щракнете Напред.
3. В Стъпка 2 на 3 прозорец, всички листове на отворената работна книга(и) са изброени и регистрирани Списък с работни листове раздел, кликнете върху Напред да продължиш.
Съвет: ако искате да комбинирате само някои от листовете, просто маркирайте имената на листовете, от които се нуждаете, и оставете други без отметка. Ако искате да добавите още работни книги за комбиниране, щракнете върху Добавяне, за да добавите файлове или папки в раздела Списък с работни книги.
4. В Стъпка 3 на 3, посочете изчислението, етикетите, от които се нуждаете. Кликнете завършеност.
5. Изберете папка и дайте име за новата работна книга в Посочете името на файла и местоположението за комбинираната работна книга кликнете върху Save.
6. Изскача диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете Да or Не за нуждите ви. Изскача работна книга, за да посочи оригиналната работна книга и връзките към новата работна книга, щракнете върху връзката към пътя на новата работна книга, за да я отворите за проверка.
Ако вашите данни са в проста структура, както е показано на екранната снимка по-долу, можете директно да комбинирате листовете в обобщена таблица.
Кликнете, за да изтеглите пробата
1. Активирайте работната книга, която ще използвате, щракнете Персонализирайте лентата с инструменти за бърз достъп > Още команди.
2. В пукането Опции на Excel прозорец, изберете Всички команди от Изберете команди от раздел, след което плъзнете лентата за превъртане, за да изберете Съветник за обобщена таблица и обобщена диаграма.
3. кликване Добави за да добавите Съветник за обобщена таблица и обобщена диаграма към Персонализирайте лентата с инструменти за бърз достъп, Щракнете върху OK.
4. Щракнете върху Съветник за обобщена таблица и обобщена диаграма команда от лентата с инструменти и в Стъпка 1 на 3, Проверете Множество диапазони на консолидация и обобщена таблица опции, щракнете Напред.
5. В Стъпка 2a от 3, отметнете Ще създам опцията за полета на страницата, щракнете Напред.
6. В Стъпка 2б от 3, щракнете върху иконата за избор, за да изберете диапазона, който искате да комбинирате, щракнете Добави за да го добавите към Всички диапазони повторете тази стъпка, за да добавите всички диапазони, използвани за комбиниране. Проверете 0 в Колко полета на страницата искате. Щракнете Напред.
7. Изберете местоположението, в което искате да създадете обобщената таблица Стъпка 3 на 3, Щракнете върху завършеност.
Сега е създадена обобщена таблица, задайте настройките в Полета на обобщена таблица прозорец, както ви трябва.
Забележка: ако структурата на данните е сложна, по мое мнение, моля, комбинирайте листове със списъка с общи методи по-горе и след това трансформирайте листа с резултати в обобщена таблица.
Google Sheet
Да предположим, че има три листа в Google, които трябва да бъдат комбинирани в един, както е показано на екранната снимка по-долу:
Кликнете, за да изтеглите примерния файл
1.1 Комбинирайте google sheets в един лист чрез функцията Filter
В лист, в който искате да поставите комбинираните данни, изберете клетка, въведете формулата по-долу:
=({filter(A!A2:B, len(A!A2:A)); filter(B!A2:B, len(B!A2:A)); filter('C'!A2:B, len ('C'!A2:A)) })
След това данните в лист A, B и C са копирани.
Във формулата:
A, B, C са имената на листовете, A2:B е обхватът на данните във всеки лист, A2:A е първата колона от всеки диапазон от данни.
1.2 Комбинирайте google sheets в един лист чрез функцията IMPORTRANGE
Тази формула често се използва за комбиниране на два диапазона в google лист.
Изберете клетка под първия диапазон от данни, въведете формулата по-долу:
=IMPORTRANGE("https://docs.google.com/spreadsheets/d/13K4vuZukmS4-x0qJs0EAXQkneIdNqelruDBF5ff5xNQ/edit","B!A2:B4")
След това данните в лист Б са копирани по-долу.
във формулата,
https://docs.google.com/spreadsheets/d/13K4vuZukmS4-x0qJs0EAXQkneIdNqelruDBF5ff5xNQ/edit
е местоположението на листа, можете да го намерите в уеб адресната лента.
B!A2:B4 е диапазонът от клетки в лист B, който искате да копирате в първия диапазон.
Забележка: ако клетката, която поставя формулата, е била редактирана преди, формулата ще върне #REF!
Ако искате да комбинирате листове от множество работни книги в Google Sheet, няма бърз начин като Excel.
За да комбинирате google sheets от работни книги в една работна книга, можете да използвате Копирай в команда за щракване с десния бутон на менюто.
Щракнете с десния бутон върху листа, който искате да използвате, щракнете Копирай в > Нова електронна таблица or Съществуваща електронна таблица.
Ако изберете Нова електронна таблица, изскача диалогов прозорец, за да ви напомни, че листът е копиран, щракнете OK. Сега текущият лист е копиран в нова работна книга. Можете да щракнете Отворете електронна таблица да проверя.
Ако изберете Съществуваща електронна таблица- Изберете електронна таблица, в която да копирате този работен лист изскача диалогов прозорец.
1) Изберете къде е съществуващата електронна таблица;
2) Изберете работната книга, в която искате да копирате листа Файлове;
3) Или можете директно да въведете уеб адреса на работната книга, в която искате да копирате, в Или паста уеб адрес тук бар.
4) Щракнете Изберете.
Ако листът е копиран в нова електронна таблица, името на листа в новата работна книга е същото като оригиналното име, ако листът е копиран в съществуваща електронна таблица, към името на листа в комбинираната работна книга ще бъде добавен префикс на Копие на .
Разширение
Да предположим, че има два листа, които имат дубликати, трябва да комбинираме данните и да премахнем дубликатите, както е показано на екранната снимка по-долу:
Общ резултат | Премахнете дубликатите |
Кликнете, за да изтеглите пробата
1.1 Комбинирайте листове, след което премахнете дубликати чрез Премахване на дубликати
В Excel, Премахване на дубликати функция ви помага бързо да премахнете дублиращите се данни.
След като използвате горните методи за комбиниране на листове, изберете комбинираните данни и щракнете Дата > Премахване на дубликати.
в Премахване на дубликати изберете колоните, от които искате да премахнете дубликати, можете да проверите Данните ми имат заглавки за да игнорирате заглавките, щракнете OK.
След това дублиращите се редове са премахнати.
1.2 Комбинирайте листове, след което премахнете дубликатите с удобен инструмент
Ако има само два диапазона, необходими за комбиниране и премахване на дубликати, Обединяване на таблици of Kutools за Excel може директно да премахва дубликати, докато комбинира.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте работната книга, която съдържа данните, които искате да комбинирате, щракнете Kutools плюс > Обединяване на таблици.
2. В Тпозволява сливане – стъпка 1 от 5 прозорец, изберете двата диапазона, които искате да комбинирате, и ако таблиците имат две заглавки, проверете Основната таблица има заглавка намлява Справочната таблица има заглавка отметки, щракнете Напред.
3. В Стъпка 2 на 5 прозорец, проверете ключовата колона, въз основа на която искате да комбинирате диапазони, щракнете Напред.
4. В Стъпка 3 на 5 прозорец, можете да поставите отметка в колоните, за които искате да актуализирате данните въз основа на справочната таблица, щракнете върху Напред да отидете на последната стъпка.
Съвет: ако има нова колона в справочната таблица, която трябва да се добави към основната таблица, ще има прозорец стъпка 4 от 5 за добавяне на колони.
5. В Стъпка 5 на 5 прозорец, в Добавете опции раздел, проверете Добавете несъответстващи редове в края на основната таблица квадратчето за отметка в Опции за актуализиране раздел, проверете Актуализирайте клетките само когато има данни в справочната таблица квадратче за отметка. Щракнете върху завършеност.
След това двете таблици се комбинират в основната таблица без дубликати.
Да предположим, че има множество работни книги с листове с едно и също име, като sheet1, sheet2, сега, за да комбинирате всички листове с име sheet1 в един лист, всички листове с име sheet2 в един лист, както е показано на екранната снимка по-долу, можете да използвате Kutools за ExcelЕ Комбинирам функция за бързо справяне с тази работа.
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. Активирайте работните книги, които ще комбинирате, щракнете върху Kutools Plus > Комбинирам.
2. Изскача диалогов прозорец, за да ви напомни нещо за паролата, ако работната книга(ите), които използвате, не включва пароли, щракнете върху OK продължавам. В изскачането Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Комбинирайте всички работни листове с едно и също име в един работен лист опция, щракнете Напред.
3. В Стъпка 2 на 3 прозорец, всички листове на отворената работна книга(и) са изброени и регистрирани Списък с работни листове раздел, кликнете върху Напред да продължиш.
Съвет:
Ако искате да комбинирате само някои листове, просто маркирайте имената на листовете, от които се нуждаете, и оставете други без отметка.
Ако искате да добавите още работни книги за комбиниране, щракнете Добави за добавяне на файлове или папки в Списък с работни книги раздел.
4. В Стъпка 3 на 3, задайте необходимите настройки. Кликнете завършеност.
5. Изберете папка и дайте име за новата работна книга в Посочете името на файла и местоположението за комбинираната работна книга кликнете върху Save.
6. Изскача диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете Да or Не за нуждите ви. Изскача работна книга, за да посочи оригиналната работна книга и връзките към новата работна книга, щракнете върху връзката към пътя на новата работна книга, за да я отворите за проверка.
Комбинирайте по ред
Комбинирайте по колона
Ако искате да комбинирате едни и същи диапазони в листове в един лист, например, комбинирайте само диапазона A1: B5 от работна книга A и работна книга B в един лист, Комбинирайте функцията на Kutools за Excel ще бъде добър избор.
A | B | Комбиниран Reuslt |
1. Активирайте работните книги, които ще използвате, щракнете Kutools плюс > Комбинирам.
2. Изскача диалогов прозорец, за да ви напомни нещо за паролата, ако работната книга(ите), които използвате, не включва пароли, щракнете върху OK продължавам. В изскачането Комбинирайте работни листове – Стъпка 1 от 3 прозорец, провери Комбинирайте няколко работни листа от работни книги в един работен лист опция, щракнете Напред.
3. В Стъпка 2 на 3 прозорец, всички листове на отворената работна книга(и) са изброени и регистрирани Списък с работни листове раздел, щракнете върху иконата за избор в Списък с работни листове, след което изберете диапазона, който искате да използвате. След това щракнете Същият диапазон бутон, за да зададете обхвата на всички листове на A1:B5. Кликнете Напред.
Съвет:
1) Ако искате да комбинирате само някои листове, просто маркирайте имената на листовете, от които се нуждаете, и оставете други без отметка.
2) Ако искате да добавите още работни книги за комбиниране, щракнете Добави за добавяне на файлове или папки в Списък с работни книги раздел.
4. В Стъпка 3 на 3, задайте необходимите настройки. Кликнете завършеност.
5. Изберете папка и дайте име за новата работна книга в диалоговия прозорец Посочете името на файла и местоположението за комбинираната работна книга, щракнете върху Save.
6. Изскача диалогов прозорец, който ви пита дали да запазите настройките като сценарий, щракнете Да or Не за нуждите ви. Изскача работна книга, за да посочи оригиналната работна книга и връзките към новата работна книга, щракнете върху връзката към пътя на новата работна книга, за да я отворите за проверка.
Може също да се интересувате |
Комбинирайте/импортирайте множество Csv файлове в множество работни листове Комбинирайте клетки и запазете форматирането на клетките в Excel Комбинирайте съдържанието на множество клетки, без да губите данни в Excel Комбинирайте дата и час в една клетка в Excel |
Най-добрите инструменти за производителност в офиса
Kutools за Excel решава повечето от вашите проблеми и увеличава вашата производителност с 80%
- Супер Формула Бар (лесно редактиране на няколко реда текст и формула); Оформление за четене (лесно четене и редактиране на голям брой клетки); Поставяне във филтриран диапазон...
- Обединяване на клетки/редове/колони и съхраняване на данни; Съдържание на разделени клетки; Комбинирайте дублиращи се редове и сума/средно... Предотвратяване на дублиращи се клетки; Сравнете диапазони...
- Изберете Дублиран или Уникален редове; Изберете Празни редове (всички клетки са празни); Super Find и Fuzzy Find в много работни тетрадки; Произволен избор...
- Точно копие Множество клетки без промяна на референтната формула; Автоматично създаване на препратки към множество листа; Вмъкване на куршуми, квадратчета за отметка и други...
- Любими и бързо вмъкнати формули, диапазони, диаграми и снимки; Шифроване на клетки с парола; Създаване на пощенски списък и изпращайте имейли...
- Извличане на текст, Добавяне на текст, Премахване по позиция, Премахване на пространството; Създаване и отпечатване на междинни суми за пейджинг; Конвертиране на съдържание и коментари между клетки...
- Супер филтър (запазване и прилагане на филтърни схеми към други листове); Разширено сортиране по месец/седмица/ден, честота и други; Специален филтър с удебелен шрифт, курсив...
- Комбинирайте работни тетрадки и работни листове; Обединяване на таблици въз основа на ключови колони; Разделете данните на няколко листа; Пакетно конвертиране на xls, xlsx и PDF...
- Групиране на обобщена таблица по номер на седмицата, ден от седмицата и други... Показване на отключени, заключени клетки с различни цветове; Маркирайте клетки, които имат формула/име...
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!