如何在Excel中將多個工作表中的數據收集到主表中？

在某些時候，您可能需要將多個工作表中的數據收集到一個主工作表中以進行合并或其他操作，如下圖所示，但是要逐個復制粘貼內容很麻煩，是否有任何技巧可以快速解決？ Excel？

使用合并功能將多張紙中的數據收集到一張

使用VBA代碼從多張紙中收集數據

強大的合并功能將多張紙中的數據收集到一張

使用合并功能將多張紙中的數據收集到一張

如果要將數據從多個工作表收集到同一工作簿的一個工作表中，則可以在Excel中應用合并功能。

1.在要從工作表中收集數據的工作簿的新工作表中，單擊 時間 > 整合

.

2.在 Consolidate 對話框中，請執行以下操作：

（1在合并數據后選擇要執行的一項操作功能 下拉列表;

（2點擊 選擇要收集的每張紙的范圍；

（3點擊 Add 按鈕將數據范圍添加到 All references 列表框;

（4合并數據后檢查使用的標簽，并檢查 Create links to source data

如果要鏈接合并表中的數據與源數據，請選擇此選項。

3。 點擊 OK

。 現在，數據已收集并匯總到一張紙中。

輕松地將多個工作表/工作簿合并為一個工作表或工作簿

在Excel中，將多個工作表或工作簿組合成一個工作表或工作簿可能很麻煩，但是使用 結合 Kutools for Excel 中的功能，您可以將數十個工作表/工作簿合并為一張工作表或工作簿，也可以通過幾次點擊將工作表合并為一張。點擊獲取全功能 30 天！Kutools for Excel：擁有300多個便捷的Excel加載項，可以在內。 使用VBA代碼從多張紙中收集數據

這是一個VBA代碼，可以從當前工作簿的新工作表中的所有工作表中收集數據。

1。 按 Alt + F11 啟用 Microsoft Visual Basic for Applications 窗口。

2。 點擊 Insert > Module，然后將以下代碼復制并粘貼到 Module 腳本。

VBA：將工作表中的所有數據收集到一個。

Sub Combine()UpdatebyExtendoffice20180205Dim I As LongDim xRg As RangeOn Error Resume NextWorksheets.Add Sheets(1)ActiveSheet.Name = "Combined"For I = 2 To Sheets.CountSet xRg = Sheets(1).UsedRangeIf I > 2 ThenSet xRg = Sheets(1).Cells(xRg.Rows.Count + 1, 1)End IfSheets(I).ActivateActiveSheet.UsedRange.Copy xRgNextEnd SubCopy

3。 按 F5

運行代碼的關鍵是，整個工作簿的所有數據都已收集在新表Combined中。

從多個工作表收集數據，功能強大 Combine 功能

如果您通常需要將工作表合并為一張，我會為您介紹一個功能強大的合并功能，它是 Kutools for Excel“ 結合 該實用程序具有以下四個主要功能：

將工作簿中的多個工作表合并為一個工作表

將所有相同名稱的工作表合并到一個工作表中

將工作簿中的多個工作表合并到一個工作簿中

將多個工作簿中的值合并并計算到一個工作表中

Kutools for Excel, 與超過 300 方便的功能，使您的工作更加輕松。30 天內免費提供全功能

后 免費安裝Kutools for Excel，請執行以下操作：

如果你只是想 結合 從一張紙變成一張紙而無需任何其他操作，您可以按照以下步驟操作：

1.啟用Excel，單擊 Kutools Plus > Combine，彈出一個或兩個對話框以提醒您一些注意事項，只需點擊 OK 和 是

接著說。 看截圖：

2。 點擊 OK 去 Combine 窗口，檢查 Combine multiple worksheets from workbook into worksheet

選項。

3。 點擊 Next，然后點擊 Add > File / Folder 添加您將用于合并的工作簿 Workbook list。 然后去 Worksheet list

檢查要合并的表格以構成每個工作簿。

4。 點擊 Next

要轉到最后一步，可以根據需要指定一些關于合并結果的設置。 如果不需要此步驟。

5。 點擊 Finish

并選擇一個文件夾以放置新工作簿，該工作簿將合并工作表中的數據。

6。 點擊 保存

。 現在，所有數據已從工作簿中的工作表收集到一個主工作表中。

將工作簿中的所有工作表合并到一個工作表中

如果您想 鞏固將工作簿中的工作表合二為一，如下所示：

1.在 Combine 窗口，檢查 Consolidate and calculate values across multiple worksheets into one worksheet

選項。

2。 點擊 Next，然后將文件添加到 Workbook list

，然后檢查用于合并和計算的工作表。

3。 點擊 Next，然后從中選擇一種計算 Function

下拉列表，然后根據需要檢查其他選項。

4。 點擊 Finish 將新工作簿保存到文件夾中。

現在，跨工作簿的工作表已合并并計算為一張工作表。

Comsolidate worksheets from workbooks into one sheetKutools for Excel：Excel中必須具備的300個函數， 從這里。

最佳辦公生產力工具

熱門特色: 查找、突出顯示或識別重復項 |刪除空白行 |合并列或單元格而不丟失數據 | 不使用公式進行四舍五入...超級查詢: 多條件VLookup| 多值VLookup| 跨多個工作表的 VLookup | 模糊查詢....高級下拉列表: 快速創建下拉列表 |依賴下拉列表 |多選下拉列表....列管理器: 添加特定數量的列 | 移動列 | 切換隱藏列的可見性狀態 | 比較范圍和列...特色功能: 網格焦點 |設計圖 | 大方程式酒吧 |工作簿和工作表管理器|資源庫 （自動文本）|日期選擇器|合并工作表 |加密/解密單元格 |按列表發送電子郵件 |超級篩選 | 特殊過濾器 （過濾粗體/斜體/刪除線...）...前 15 個工具集: 12 文本 工具 (添加文本, 刪除字符，...） | 50+ 圖表 類型 (甘特圖，...） | 40+ 實用 公式 (根據生日計算年齡，...） | 19 插入 工具 (插入二維碼, 從路徑插入圖片，...） | 12 轉化 工具 (小寫金額轉大寫, 貨幣兌換，...） | 7 合并與拆分 工具 (高級組合行, 分裂細胞，...） | ... 和更多

使用 Kutools for Excel 增強您的 Excel 技能，體驗前所未有的效率。 Kutools for Excel 提供了 300 多種高級功能來提高生產力并節省時間。 單擊此處獲取您最需要的功能...

Office Tab 為 Office 帶來選項卡式界面，讓您的工作更加輕松在Word，Excel，PowerPoint中啟用選項卡式和閱讀，發布者，Access，Visio和Project。在同一窗口的新選項卡中而不是在新窗口中打開并創建多個文檔。每天將您的工作效率提高50％，并減少數百次鼠標單擊！