1.點擊數(shù)據(jù)選項卡，進入excel軟件界面，先點擊上方的數(shù)據(jù)選項卡。

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

3.點擊從Excel工作簿，在彈出的子菜單里面點擊從Excel工作簿的選項。

小編還為您整理了以下內容，可能對您也有幫助：

怎樣才能將多個Excel表格的內容合并到一個表格里面？

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

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

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

2. 選擇要合并的第一個Excel表格，點擊“打開”；

3. 在“文本導入向導”中，選擇“分隔符”選項，并勾選“制表符”和“逗號”；

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

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

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

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

方法二：使用VBA宏

1. 打開一個新的Excel文檔；

2. 點擊“開發(fā)工具”選項卡，選擇“Visual Basic”；

3. 在Visual Basic編輯器中，點擊“插入”選項卡，選擇“模塊”；

4. 將以下代碼復制到模塊中：

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("請輸入要合并的文件夾路徑：")

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. 點擊“運行”按鈕，輸入要合并的Excel表格所在的文件夾路徑；

6. 程序將自動遍歷該文件夾下的所有Excel表格，將它們的數(shù)據(jù)合并到新的Excel文檔中；

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

以上兩種方法都能夠將多個Excel表格的內容合并到一個表格里面，使用VBA宏的方法相對來說更加自動化和快捷，但需要一定的編程知識。

如何將多個excel合并成一個excel？

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

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

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

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

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

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

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

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

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

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

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

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

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

看到如下界面，到這一步可以直接點確定即可。

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

會看到的界面效果

雙擊，修改表頭

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

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

最后，點擊左上角的【關閉并上載】：

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

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

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

2、彈出的對話選擇的是文件夾，之后點打開。

3、點【轉換數(shù)據(jù)】

4、依次點擊【添加列】/【自定義列】

5、輸入公式Excel.Workbook(),括號內的參數(shù)就是右側的Content。之后點確定

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

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

多個Excel文件怎樣合并成一個？

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

具體操作步驟如下：

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

2、在彈出的對話框中，點擊左下角的瀏覽更多。

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

4、在多個sheet表格中，點擊選擇需要合并的表格，然后點擊確定。

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

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

如何批量合并Excel文件？

操作設備：戴爾電腦

操作系統(tǒng)：win10

操作軟件：Excel2016

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

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

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

Sub sheets2one()

'定義對話框變量

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、點擊菜單“運行”—“運行子過程/用戶窗體”。

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

6、點擊“確定”后，運行合并即可。

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