怎麼樣把多個excel表格合併到一個表格中？

突然發現一個很簡單的方法，可以很有效的把多個excel表格合併到一個表格中，覺得很有必要分享一下，下面就以excel2007版本的excel表格來實際舉例子，來看看如何簡單快速合併表格。

VBA代碼

（01）Sub 合併表格()Dim mypath As StringDim f As StringDim ribao As enUpdating = Falsemypath = & "/琢磨/"f = Dir( & "/琢磨/*") (mypath & f)With ts(1) after:=ts(t)End Withf = DirLoop Until Len(f) = enUpdating = TrueEnd Sub

演示步驟

（01）隨機做一下演示數據，比如新建一個文件夾，需要把裏面A組，A組 - 副本，A組 - 副本 (5)，6,7,8等excel表格合併彙總為一個。當然如果少的話，可以直接複製到同一個excel表格中。

（02）步驟一：先新建一個空白的表格，然後必須是使用支持宏功能的excel文檔才可以，這裏原來2007版本的是不支持的，需要更換或者是找開發工具，開發宏選項，之後要用到。

（03）步驟二，重點來了，選擇開發工具（必須支持宏選項才可以），選擇插入，再選擇第一個，選擇插入按鈕，然後再隨機找個空白位置，畫框框，多大，看自己喜歡。

（04）步驟三：插入按鈕之後，就會有選項可以選擇宏，但是如果是第一次新建的話，是需要先新建宏才可以，所以，就需要來新建宏按鈕啦，不需要懂VBA，直接可以使用現成的，但是需要改動一下。

（05）步驟四：輸入VBA代碼，可以直接使用，但是需要注意的一點就是，裏面的“琢磨”是對應的文件夾名稱，這個需要改動，其他的可以不用改動，不然運行起來會出現錯誤的。

（06）步驟五：設置好之後，就可以返回點擊“合併表格”（當然按鈕的名稱可以自定義，這裏隨機起的名字，也可以簡單合併，或者是合等），之後就可以看到，表格就自動合併為一個了。

特別提示

使用代碼，可以很簡單就完成了多個excel表格合併為一個表格，一個按鈕就瞬間完成了，超級方便。

但是還是得多加練習才可以，代碼的運行，就算不會寫，得看懂意思，才可以掌握。