首頁>Club>
有多個Excel工作簿,每個工作簿裡均有五個工作表,如何將多個工作簿合併成一個工作簿?合併後工作簿仍然有五個工作表。
23
回覆列表
  • 1 # Excel到PowerBI

    將多工作表的多個工作簿合併成一個工作簿其實是一個很常用的功能,從描述來看,應該是將不同工作簿中的對應表彙總到一起,在以往,這個問題除了寫VBA,就只能手工複製貼上了,但VBA對於大多數使用者來說,學習門檻太高,而手工複製貼上,那就只能“呵呵”……

    不過,現在用Excel2016的新功能Power Query(Excel2010或Excel2013可到微軟官方下載相應的外掛),就很簡單了。這裡先用直接批次合併所有Excel工作簿的案例講述其中的關鍵點,後面再透過影片進一步說明針對多個工作簿不同表分別合併的方法——跟本問題所需完全一致!

    四部合併多Excel工作簿檔案

    第一步:【資料】-【從檔案】-【從資料夾】

    第二步:【新增列】-【新增自定義列】

    注意大小寫哦,括號裡面的內容雙擊一下右邊小窗口裡的Content欄位就可以了,和Excel裡選單元格類似。

    第三步:展開資料列表

    這將列出你所有工作簿裡的所有表,如果某些工作簿裡有多張表的話,都會顯示在這裡:

    第四步:繼續展開表資料

    資料都出來啦!

    多工作簿多表分別合併影片教案

    對於多個工作簿裡的不同表分別合併的問題,其實就是在上面關於多工作簿直接合並的步驟裡多了一個篩選表的步驟而已,具體請看影片:

    更多Excel Power系列新功能文章配套材料下載PQ入門20篇:https://pan.baidu.com/s/1ITXFJF0eokdC2zKVJvkrhQPQ進階20篇:https://pan.baidu.com/s/1d1o_GfrmWFOp2tA8yhxe9APQ實戰20篇:https://pan.baidu.com/s/1EiDJPk57XtdH1x4SGd2UnQM函式基礎20篇:https://pan.baidu.com/s/1BWzQRI4dZPZacxP6LqRECQPQ動畫30+:https://pan.baidu.com/s/19jUxwhbdXw24OtkFyWNlewPP入門15篇:https://pan.baidu.com/s/1dZLjCRiQikYnyqLc-DWo_w資料透視11篇:https://pan.baidu.com/s/112OmlCU_o_upI5B3pTt4fg
  • 2 # EXCEL學習微課堂

    如何將多個工作表的多個工作簿合併成一個工作簿?我理解應該是多個工作簿裡的多個工作表合併成一個工作表吧,因為一個EXCEL檔案就是一個工作簿,一個工作簿可以包括多個工作表,比如Sheet 1、Sheet 2、Sheet 3。下面我介紹2種方法。

    第1種方法:用Power Query

    Power Query,在2016的版本中,直接放在了選項卡里,可直接呼叫,而10和13版本需要以外掛形式單獨下載,然後安裝才能用。所以建議大家選用2016版本。

    案例:表格有7個部門的基本情況表,要求是將7個工作表合併到一個工作表。

    ①【資料】→【獲取資料】→【自檔案】→【從工作簿】→選擇需要合併工作表的工作簿→在導航器中勾選【選擇多項】→勾選需要合併的工作表→再點右下角的【編輯】

    ②【追加查詢】→【將查詢追加為新查詢】

    ④然後可以看到左邊自動添加了一個APPEND1的查詢,所有記錄都已合併到這個查詢。

    ⑤最後,點表格左上角的表格圖表,點選【複製整個表】→關閉Power Query,關閉時提示我們是否保留更改,可以不保留 →貼上合併後的表到新的工作表。

    所有部門的資訊全部合併到一個表了!

    第2種方法:VBA程式碼

    操作步驟:

    1、匯入VBA模組:新建一個EXCEL文件,按ALT+F11 調出VBA 編輯器 →在工程視窗右擊選擇【匯入檔案】→選擇VBA 模組檔案,合併工作表和工作簿.bas)→關閉VBA 編輯器。

    2、合併工作簿:【開發工具】→【宏】→【合併工作簿】→【執行】→選擇需要合併的工作簿→我們選擇需要合併的所有工作簿,點【開啟】,所有工作簿裡面的工作表都放到了新建的文件裡。如果按你的要求,合併後還有5個工作表,則到此步就可以了。如需將5個工作表再合併成一個表,則再執行下一步合併工作表。

  • 3 # 雷哥office

    看到Excel多表合併,其實常見的有2種場景

    場景一:多個Excel檔案需要合併為1個Excel檔案(多個工作簿合併為1個工作簿)

    場景二:1個Excel檔案種有多個工作表,需要合併為1個工作表

    首先來看下,場景一(多個Excel檔案合併為1個檔案),都有哪些方法可以實現?

    場景描述:如圖所示,在資料夾中,有4個Excel檔案,每個Excel檔案的資料格式都一致,需要把4個Excel檔案合併到1個Excel檔案中。

    每個工作簿中的內容格式都一樣,為了區分,我把工作簿1中的 位置 資料,標為了“工作簿1”;工作簿2中的資料標為了“工作簿2”...以此類推。

    下面雷哥推薦幾種方法來實現多個Excel檔案合併為1個檔案

    方法一:PowerQuery

    Step1:單擊 【資料】- 【新建查詢】 - 【從檔案】- 【從資料夾】

    Step2:單擊 【瀏覽】,選擇資料夾路徑

    Step3:選擇【合併並載入】

    最終的效果如圖所下圖所示。自動增加了

    Source.Name

    資料列,可以很方便看到資料來自於哪個工作簿

    方法二:使用CMD命令,1s搞定合併

    Step1:需要把檔案格式修改為 csv檔案格式。開啟檔案,另存為csv檔案即可

    copy *.csv out.csv, 即把該路徑下所有的csv檔案合併到out.csv檔案中。

    下面來看下,場景二(多個Excel工作表合併為1個Excel工作簿),都有哪些方法可以實現?

    場景描述:如圖所示,1個excel檔案中,有多個工作表,需要合併到1個工作表中。

    方法1:PowerQuery法

    Step1:單擊 【資料】- 【新建查詢】 - 【從工作簿】

    Step2:選擇需要合併的工作表

    Step3:在追加查詢中,單擊【將查詢追加為新查詢】

    Step4:選擇所需的工作表

    Step5:單擊關閉並上載

    最終的效果如圖所示

    方法2:使用宏

    Step1:按【Alt】+【F11】

    Step2:輸入程式碼,並單擊三角形圖示執行

    Application.ScreenUpdating = False For j = 1 To Sheets.Count If Sheets(j).Name <> ActiveSheet.Name Then X = Range("A60000).End(xlUp).Row + 1 Sheets(j).UsedRange.Copy Cells(X, 1) End If Next Range("B1").Select Application.ScreenUpdating = True MsgBox "小主,資料合併結束啦!", vbInformation, "提示" End Sub

    執行效果如下圖所示,後續我們刪去多餘的標題行即可~

    方法三:外掛法 - 最簡單

    Step1:使用【方方格子】外掛,單擊【合併工作表】

    Step2:選擇彙總區域後,單擊確定

    最終的效果如下

    還是外掛最簡單,分分鐘搞定哈~

  • 中秋節和大豐收的關聯?
  • 提前還款對徵信有影響嗎?