如何快速合并多個(gè)excel文件

1.點(diǎn)擊數(shù)據(jù)選項(xiàng)卡，進(jìn)入excel軟件界面，先點(diǎn)擊上方的數(shù)據(jù)選項(xiàng)卡。

2.點(diǎn)擊來自文件，打開獲取數(shù)據(jù)的菜單后點(diǎn)擊里面的來自文件。

3.點(diǎn)擊從Excel工作簿，在彈出的子菜單里面點(diǎn)擊從Excel工作簿的選項(xiàng)。

小編還為您整理了以下內(nèi)容，可能對(duì)您也有幫助：

怎樣才能將多個(gè)Excel表格的內(nèi)容合并到一個(gè)表格里面？

有多種方法可以將多個(gè)Excel表格的內(nèi)容合并到一個(gè)表格里面，以下是其中兩種常見的方法：

方法一：使用Excel自帶的合并工具

1. 打開一個(gè)新的Excel文檔，點(diǎn)擊“數(shù)據(jù)”選項(xiàng)卡，在“來自其他來源”一欄中選擇“從文本/CSV”選項(xiàng)；

2. 選擇要合并的第一個(gè)Excel表格，點(diǎn)擊“打開”；

3. 在“文本導(dǎo)入向?qū)А敝校x擇“分隔符”選項(xiàng)，并勾選“制表符”和“逗號(hào)”；

4. 點(diǎn)擊“下一步”，在“列數(shù)據(jù)格式”中選擇“文本”；

5. 點(diǎn)擊“完成”，將數(shù)據(jù)導(dǎo)入到新的Excel文檔中；

6. 重復(fù)以上步驟，將其他Excel表格的數(shù)據(jù)分別導(dǎo)入到新的Excel文檔中；

7. 最后，將所有數(shù)據(jù)復(fù)制到同一個(gè)工作表中即可。

方法二：使用VBA宏

1. 打開一個(gè)新的Excel文檔；

2. 點(diǎn)擊“開發(fā)工具”選項(xiàng)卡，選擇“Visual Basic”；

3. 在Visual Basic編輯器中，點(diǎn)擊“插入”選項(xiàng)卡，選擇“模塊”；

4. 將以下代碼復(fù)制到模塊中：

Sub MergeAllWorkbooks()

Dim SummarySheet As Worksheet

Dim FolderPath As String

Dim NRow As Long

Dim FileName As String

Dim WorkBk As Workbook

Dim SourceRange As Range

Dim DestRange As Range

Application.ScreenUpdating = False

Set SummarySheet = ThisWorkbook.Worksheets.Add

FolderPath = InputBox("請(qǐng)輸入要合并的文件夾路徑：")

If Right(FolderPath, 1) <> "\" Then FolderPath = FolderPath + "\"

FileName = Dir(FolderPath & "*.xls*")

Do While FileName <> ""

Set WorkBk = Workbooks.Open(FolderPath & FileName)

Set SourceRange = WorkBk.Worksheets(1).UsedRange

If NRow = 0 Then

Set DestRange = SummarySheet.Range("A1")

SourceRange.Copy DestRange

Else

Set DestRange = SummarySheet.Range("A" & NRow + 1)

SourceRange.Copy DestRange

End If

NRow = SummarySheet.UsedRange.Rows.Count

WorkBk.Close False

FileName = Dir()

Loop

SummarySheet.Columns.AutoFit

Application.ScreenUpdating = True

End Sub

5. 點(diǎn)擊“運(yùn)行”按鈕，輸入要合并的Excel表格所在的文件夾路徑；

6. 程序?qū)⒆詣?dòng)遍歷該文件夾下的所有Excel表格，將它們的數(shù)據(jù)合并到新的Excel文檔中；

7. 最后，保存新的Excel文檔即可。

以上兩種方法都能夠?qū)⒍鄠€(gè)Excel表格的內(nèi)容合并到一個(gè)表格里面，使用VBA宏的方法相對(duì)來說更加自動(dòng)化和快捷，但需要一定的編程知識(shí)。

如何將多個(gè)excel合并成一個(gè)excel？

首先，從下圖中，我們要很形象化地先明確掉文件夾、工作簿、工作表的概念。

其次，要合并的數(shù)據(jù)應(yīng)該是格式統(tǒng)一的，工作簿/工作表表頭（或者叫字段名）要一致、列數(shù)等同，否則只是一堆亂糟糟的數(shù)據(jù)合并堆砌就沒有任何意義。

Excel合并成一個(gè)Excel存在兩種情況，一種是多個(gè)工作表合并成一個(gè)工作表，另一種是多個(gè)工作簿合并成一個(gè)工作簿。

工作表/工作簿合并的方式以下幾種辦法：

1、臨時(shí)性的少量工作簿少量工作表的情況，我們直接復(fù)制粘貼數(shù)據(jù)即可。這種情況不會(huì)花太多時(shí)間，即使職場(chǎng)小白絕大多數(shù)都是可以輕松上手。

2、如果要合并的Excel文件格式是CSV，可以用Windows 批處理命令進(jìn)行處理。但想必這種方法很冷門。掌握的人就不可能會(huì)為了合并幾個(gè)Excel而犯愁。

3、通過VBA代碼進(jìn)行合并。這種方法并入容易上手，而且VBA代碼還是蠻晦澀，不容易上手，好處是VBA代碼兼容性好，基本上啥版本的Excel都可以正常使用。

4、使用微軟office2013版及以上的版本自帶的Power Query進(jìn)行合并。Power Query簡(jiǎn)稱PQ。它可以在你不懂任何代碼或者只需要掌握極少幾個(gè)英語單詞一樣的函數(shù)名稱的情況下，點(diǎn)點(diǎn)幾個(gè)按鈕就能實(shí)現(xiàn)數(shù)據(jù)的合并。

我們重點(diǎn)說第四種方法。我默認(rèn)您使用的就是微軟Office2013或以上的版本。如果沒有，安裝一下就可以了。

我們先說合并工作表的情況。打開的Excel軟件依次點(diǎn)擊【數(shù)據(jù)】/【新建查詢】/【從Excel工作簿】，見附圖：

點(diǎn)【從Excel工作簿】之后，找到您要做合并處理的工作簿文件。如下截圖中，我以合并杭州天氣為例。選擇文件，然后點(diǎn)【導(dǎo)入】。

出現(xiàn)的界面我們直接選擇文件夾，即第一個(gè)紅框位置，然后點(diǎn)【轉(zhuǎn)換數(shù)據(jù)】。

點(diǎn)【轉(zhuǎn)換數(shù)據(jù)】后就可以看到如下界面，接著點(diǎn)開箭頭指向的框紅的按鈕。

看到如下界面，到這一步可以直接點(diǎn)確定即可。

以下截圖是你會(huì)看到的部分界面。我們參照追加合并的每個(gè)表的表頭，雙擊下圖中箭頭指向的名稱，直接改成對(duì)應(yīng)的表頭名稱即可。

會(huì)看到的界面效果

雙擊，修改表頭

表頭修改完成后，隨機(jī)選擇一個(gè)表頭的列，在此以【索引】列為例，把但凡是表頭名稱的“索引”的行篩除掉，看以下截圖

這一步操作完成后的數(shù)據(jù)就是所有合并完成好的數(shù)據(jù)了。你可以把默認(rèn)自帶的一些表頭刪除掉。

最后，點(diǎn)擊左上角的【關(guān)閉并上載】：

合并工作表的工作就這么完成了。整個(gè)過程不存在需要你輸入任何代碼，是不是比VBA輕松多了？

接下來我們說說合并多個(gè)Excel工作簿。流程上，跟合并工作表差不多，但有三個(gè)不同之處：

1、點(diǎn)【數(shù)據(jù)】/【新建查詢】/后，需要選擇【從文件夾】

2、彈出的對(duì)話選擇的是文件夾，之后點(diǎn)打開。

3、點(diǎn)【轉(zhuǎn)換數(shù)據(jù)】

4、依次點(diǎn)擊【添加列】/【自定義列】

5、輸入公式Excel.Workbook(),括號(hào)內(nèi)的參數(shù)就是右側(cè)的Content。之后點(diǎn)確定

接下來的操作跟合并工作表的操作套路一樣。另外，PQ處理好之后，如果您的數(shù)據(jù)有新增，不管是新增了工作簿還是工作表，你需要追加合并時(shí)只需要刷新數(shù)據(jù)即可，不用再重復(fù)操作以上過程，減少了許多重復(fù)勞動(dòng)，真正可以一勞永逸哦。

希望能幫到您，趕緊試試看！

多個(gè)Excel文件怎樣合并成一個(gè)？

把多個(gè)相同格式的Excel表格數(shù)據(jù)快速的合并到一張表格中，可通過使用“數(shù)據(jù)鏈接”功能實(shí)現(xiàn)。

具體操作步驟如下：

1、在電腦中打開EXCEL表格，點(diǎn)擊數(shù)據(jù)標(biāo)簽頁中的“獲取外部數(shù)據(jù)”，在彈出的選項(xiàng)中點(diǎn)擊選擇“現(xiàn)有連接”。

2、在彈出的對(duì)話框中，點(diǎn)擊左下角的瀏覽更多。

3、找到并點(diǎn)擊選擇需要合并的表格，然后點(diǎn)擊打開。

4、在多個(gè)sheet表格中，點(diǎn)擊選擇需要合并的表格，然后點(diǎn)擊確定。

5、彈出導(dǎo)入數(shù)據(jù)對(duì)話框，可使用默認(rèn)設(shè)置，點(diǎn)擊下方的確定按鈕，重復(fù)步驟3、4即可合并多個(gè)表格數(shù)據(jù)。

6、返回EXCEL表格，發(fā)現(xiàn)把多個(gè)相同格式的Excel表格數(shù)據(jù)快速的合并到一張表格中操作完成。

如何批量合并Excel文件？

操作設(shè)備：戴爾電腦

操作系統(tǒng)：win10

操作軟件：Excel2016

1、將需合并的Excel文件放在同一個(gè)文件夾中。

2、打開新建的Excel文件，按 Alt + F11 鍵，打開宏，選擇視圖→代碼窗口。

3、將下面的代碼拷貝粘貼到代碼窗口中：

Sub sheets2one()

'定義對(duì)話框變量

Dim cc As FileDialog

Set cc = Application.FileDialog(msoFileDialogFilePicker)

Dim newwork As Workbook

Set newwork = Workbooks.Add

With cc

If .Show = -1 Then

Dim vrtSelectedItem As Variant

Dim i As Integer

i = 1

For Each vrtSelectedItem In .SelectedItems

Dim tempwb As Workbook

Set tempwb = Workbooks.Open(vrtSelectedItem)

tempwb.Worksheets(1).Copy Before:=newwork.Worksheets(i)

newwork.Worksheets(i).Name = VBA.Replace(tempwb.Name, ".xls", "")

tempwb.Close SaveChanges:=False

i = i + 1

Next vrtSelectedItem

End If

End With

Set cc = Nothing

End Sub

4、點(diǎn)擊菜單“運(yùn)行”—“運(yùn)行子過程/用戶窗體”。

5、在彈出選擇對(duì)話框中，選擇要批量合并的Excel文件，點(diǎn)擊“確定”即可合并為一個(gè)Excel工作簿。

6、點(diǎn)擊“確定”后，運(yùn)行合并即可。

聲明：本網(wǎng)頁內(nèi)容旨在傳播知識(shí)，若有侵權(quán)等問題請(qǐng)及時(shí)與本網(wǎng)聯(lián)系，我們將在第一時(shí)間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com