當需要將多個Excel文件合并在一起時，一個一個合并的方法太麻煩了。下面介紹一個快速方法： 步驟一：新建一個文件夾 首先，在桌面或任意其他盤符內(nèi)新建一個文件夾，將要合并的Excel文件放入該文件夾

當需要將多個Excel文件合并在一起時，一個一個合并的方法太麻煩了。下面介紹一個快速方法：

步驟一：新建一個文件夾

首先，在桌面或任意其他盤符內(nèi)新建一個文件夾，將要合并的Excel文件放入該文件夾中。

步驟二：新建一個Excel文件

在剛才創(chuàng)建的文件夾中，新建一個Excel文檔。

步驟三：查看代碼

打開新建的Excel文件，在左下角的Sheet1表上點擊鼠標右鍵，選擇"查看代碼"。

步驟四：復(fù)制代碼

進入代碼視圖后，將以下代碼拷貝到代碼框中：

Sub 合并當前目錄下所有工作簿的全部工作表()
Dim MyPath, MyName, AWbName
Dim Wb As Workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
MyPath %
MyName  Dir(MyPath amp; quot;quot; amp; quot;*.xlsquot;)
AWbName %
Num  0
Do While MyName lt;gt; quot;quot;
If MyName lt;gt; AWbName Then
Set Wb %
Num  Num   1
With Workbooks(1%
For G  1 To%
Next
WbN  WbN amp; Chr(13) amp;%
End With
End If
MyName  Dir
Loop
Range(quot;B1quot;%
MsgBox quot;共合并了quot; amp; Num amp; quot;個工作薄下的全部工作表。如下：quot; amp; Chr(13) amp; WbN, vbInformation, quot;提示quot;
End Sub

步驟五：運行代碼

點擊運行圖標（紅色圈中標注），運行結(jié)束后，就可以在Sheet1表中看到合并后的內(nèi)容了。

步驟六：統(tǒng)計和篩選

現(xiàn)在，你可以在同一張表中進行統(tǒng)計、篩選等日常處理操作了。

如果你經(jīng)常需要使用這個方法，可以將步驟中的代碼復(fù)制并記錄下來，以便日后使用。