如何在 Excel 中合併具有相同標題的多個工作表？

例如，您在不同的工作表中有一些具有相同標題的數據（如下方截圖所示），現在您的任務是將這些工作表合併到一個工作表中。與其逐一手動複製和粘貼，本教程將介紹更高效的方法來完成此操作。

使用 VBA 合併具有相同標題的工作表

使用「合併計算」功能合併具有相同標題的 Excel 工作表

使用 Kutools for Excel 合併或合併計算具有相同標題的 Excel 工作表

使用 VBA 合併具有相同標題的工作表

如果您只想合併具有相同標題的工作表而不進行任何計算，可以應用 VBA 代碼來解決這個問題。

1. 啟動要合併工作表的工作簿，按下 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2. 點擊 插入 > 模組，然後將以下 VBA 代碼粘貼到新的模組窗口中。

VBA：合併具有相同標題的工作表

Sub Combine()
'UpdateByKutools20151029
    Dim i As Integer
    Dim xTCount As Variant
    Dim xWs As Worksheet
    On Error Resume Next
LInput:
    xTCount = Application.InputBox("The number of title rows", "", "1")
    If TypeName(xTCount) = "Boolean" Then Exit Sub
    If Not IsNumeric(xTCount) Then
        MsgBox "Only can enter number", , "Kutools for Excel"
        GoTo LInput
    End If
    Set xWs = ActiveWorkbook.Worksheets.Add(Sheets(1))
    xWs.Name = "Combined"
    Worksheets(2).Range("A1").EntireRow.Copy Destination:=xWs.Range("A1")
    For i = 2 To Worksheets.Count
        Worksheets(i).Range("A1").CurrentRegion.Offset(CInt(xTCount), 0).Copy _
               Destination:=xWs.Cells(xWs.UsedRange.Cells(xWs.UsedRange.Count).Row + 1, 1)
    Next
End Sub

3. 按下 F5 鍵運行 VBA，隨後會彈出一個對話框讓您輸入標題行的數量。請參見截圖：

4. 點擊 確定。當前工作簿中的所有工作表都將合併到名為“Combined”的新工作表中。

提示：

(1.) 您的數據必須從 A1 開始，否則該代碼不會生效。

(2.) 您的數據結構必須相同。

(3.) 此代碼只能合併當前工作簿的所有工作表，若您想合併來自多個工作簿的工作表，此代碼無法實現。

使用「合併計算」功能合併具有相同標題的 Excel 工作表

假設您有一些具有相同列和行標題的數據（如下方截圖所示），並且希望合併具有相同標題的 Excel 工作表並進行一些計算，您可以使用 Excel 的「合併計算」功能。

1. 打開所有要合併工作表的工作簿，並將游標放在您希望放置合併數據的空白單元格上，然後點擊 數據 > 合併計算。請參見截圖：

2. 在「 合併計算」窗口中，執行以下操作：

1) 從 函數 列表中選擇所需的計算；
2) 點擊選擇要合併的區域。
3) 點擊 添加 按鈕將該範圍添加到 所有引用 列表中。重複步驟 2) 和 3)，將所有需要合併的範圍添加到此列表中。
4) 在 使用標籤於 區域勾選 首行 和 最左列。
5) 如果您希望將合併的數據鏈接到源數據，請勾選 創建指向源數據的鏈接。

3. 點擊 確定。現在所有具有相同標題的數據範圍都被合併到一起，並按標題進行求和。

使用 Kutools for Excel 合併或合併計算具有相同標題的 Excel 工作表

在某些情況下，您可能只想合併具有相同標題的數據，而在其他情況下，您可能希望合併數據並進行合併計算，是否有技巧可以同時解決這兩個任務？這裡我向您介紹 Kutools for Excel 強大的 合併 功能。

合併具有相同標題的 Excel 工作表

合併計算具有相同標題的多個工作表

安裝 Kutools for Excel 後，請按照以下步驟操作：（立即免費下載 Kutools for Excel！）

合併具有相同標題的 Excel 工作表

1. 點擊 Kutools Plus > 合併 啟用 合併 向導，然後勾選 複製多個工作簿中的數據到一個工作表中。請參見截圖：

2. 點擊 下一步>> 進入 合併工作表 - 第 2 步/共 3 步 向導，並執行以下操作：

1) 點擊 添加 > 文件/目錄 以添加要合併工作表的工作簿至 工作簿列表;
2) 勾選要合併工作表的工作簿名稱，您可以選擇多個工作簿；
3) 勾選要合併在一起的工作表；
4) 點擊 選擇要合併的範圍，如果範圍位於每個工作表的相同位置，只需從某個工作表中選擇一個範圍，然後點擊 相同區域.

3. 點擊 下一步>> 進入 合併工作表 – 第 3 步/共 3 步 向導，勾選 按行合併數據 選項，並在 標題行數 文本框中輸入 1，如果範圍內沒有標題，則輸入 0。

4. 點擊 完成，隨後會彈出一個對話框提醒您保存此方案，若要保存，點擊 是，否則點擊 否。

現在，工作表已合併到具有相同行標題的新工作簿中。

合併計算具有相同標題的多個工作表

安裝 Kutools for Excel 後，請按照以下步驟操作：（立即免費下載 Kutools for Excel！）

1. 點擊 企業 > 合併 顯示 合併 向導，並勾選 合併計算多個工作簿中的數據到一個工作表中。請參見截圖：

2. 點擊 下一步>> 進入 合併工作表 - 第 2 步/共 3 步 向導，並執行以下操作：

1) 點擊 添加 > 文件/目錄 以添加要合併工作表的工作簿至 工作簿列表;
2) 勾選要合併工作表的工作簿名稱，您可以選擇多個工作簿；
3) 勾選要合併在一起的工作表；
4) 點擊  選擇要合併的範圍，如果範圍位於每個工作表的相同位置，只需從某個工作表中選擇一個範圍，然後點擊 相同區域.

3. 繼續點擊 下一步>>，並選擇要在合併範圍中應用的函數，並勾選合併範圍的標籤。請參見截圖：

4. 點擊 完成，隨後會彈出一個對話框詢問您是否保存該方案，點擊 是 保存，或點擊 否 不保存。

然後，範圍將被合併到一個新工作簿中。

Kutools for Excel 的 合併 功能的優勢在於，您可以將多個打開或未打開的工作簿中的工作表合併到一個工作表或一個工作簿中。

相關文章

• 如何在 Excel 中將帶有前導零的多個單元格合併到一個單元格中？
• 如何在 Excel 中生成所有可能的四位數字組合列表？
• 如何將工作簿中的每個工作表保存為單獨的文本文件？