如果我們需要將多個(gè)Excel表格文件合并成一個(gè)該怎么做呢？一個(gè)Excel文件中可以建立多個(gè)表格，但是如果一個(gè)文件就一個(gè)表格，怎么才能把他們合并起來呢？當(dāng)然我們也可以打開表格一個(gè)一個(gè)的復(fù)制到一個(gè)excel文件中，但是如果表格太多的話復(fù)制起來是很麻煩的，下面小編就詳細(xì)的為大家介紹快速合并多個(gè)excel表格的方法。

操作方法：

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

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

3、將下面的代碼拷貝進(jìn)去：

　　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、點(diǎn)擊運(yùn)行選項(xiàng)運(yùn)行宏命令。

　　5、之后彈出選擇對話框，選擇要批量合并的Excel名，確定即可。

　　6、程序運(yùn)行完畢后，會(huì)自動(dòng)生成一個(gè)工作簿，工作簿內(nèi)包含所有需合并的Excel文件，將工作簿另存為即可。

以上就是快速合并多個(gè)表格的方法了。合并后的Excel文檔會(huì)出現(xiàn)多個(gè)Sheet頁，合并之后我們只需要在一個(gè)excel界面內(nèi)即可完成不同表格之間的切換了。