怎樣將多個excel表格合併到一個excel表格中

Excel表格是一個數據彙總的實用工具之一，也是各行業都需要用到的數據彙總工具之一。當數據過多時，就需要用excel表格的技巧去分類處理這些數據，那麼怎樣將多個excel表格合併到一個excel表格中呢，下面就來看看步驟吧：

操作方法

（01）首先將需要合併的excel所有表格存放在同一個文件夾中，如下圖：

（02）然後再該文件夾中新建一個空白的excel表格，如下圖：

（03）然後打開新建的excel表格，找到sheet1，然後在sheet1上面鼠標單擊右鍵，點擊“查看代碼”，如下圖：

（04）點擊“查看代碼”後，就會出現下圖中的框框，然後在右邊框框中填入下列代碼：Sub 合併當前目錄下所有工作簿的全部工作表()Dim MyPath, MyName, AWbNameDim Wb As Workbook, WbN As StringDim G As LongDim Num As LongDim BOX As enUpdating = FalseMyPath = MyName = Dir(MyPath & "" & "*")AWbName = Num = 0Do While MyName <> ""If MyName <> AWbName ThenSet Wb = (MyPath & "" & MyName)Num = Num + 1With Workbooks(1)s(e("A65536")(xlUp) + 2, 1) = Left(MyName, Len(MyName) - 4)For G = 1 To ts(G) s(e("A65536")(xlUp) + 1, 1)NextWbN = WbN & Chr(13) & e FalseEnd WithEnd IfMyName = DirLoopRange("A1")enUpdating = TrueMsgBox "共合併了" & Num & "個工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"End Sub

（05）代碼填入好後，如果代碼出現紅色的，那説明改代碼有問題，需要更改，反之正常。

（06）確定代碼無誤後，再點擊下圖中箭頭所指的圖標或者是按快捷鍵F5，即可開始excel表格的合併運行

（07）若結果彈出下面的對話框，這説明合併成功，反之就沒有

特別提示

需要實現這個功能的前提是需要使用Microsoft Excel，而WPS Excel是實現不了的

一定要注意所填入的代碼的正確性和規範性