使用EXCEL的工作組模式。

1、對於需要加入工作組的工作表進行選擇，Ctrl+工作表標籤。如圖中選擇Sheet4、Sheet5、Sheet6。

2、選擇後會在工作簿的標題欄上，顯示[工作組]，如下圖：

3、在工作組模式下，在任何一個工作組中的工作表中的單元格中輸入，其他工作表中就會同時自動輸入。

1、首先，按組合鍵“ALT+F11”開啟VBE編輯器，在工程視窗下的“Microsoft Excel”物件進行單擊滑鼠右鍵，再在彈出的框再進行如圖所示的操作。

2、然後，在其中貼上下面的程式碼:再進行儲存。

Sub 工作簿間工作表合併

（）Option ExplicitSub hbgzb()

Dim sh As Worksheet, flag As Boolean, i As Integer, hrow As Integer, hrowc As Integer

For i = 1 To Sheets.Count

If Sheets(i).Name = "合併資料" Then flag = True

Next

If flag = False Then

Set sh = Worksheets.Add

sh.Name = "合併資料"

Sheets("合併資料").Move after:=Sheets(Sheets.Count)

End If

For i = 1 To Sheets.Count

If Sheets(i).Name "合併資料" Then

hrow = Sheets("合併資料").UsedRange.Row

hrowc = Sheets("合併資料").UsedRange.Rows.Count

If hrowc = 1 Then

Sheets(i).UsedRange.Copy Sheets("合併資料").Cells(hrow, 1).End(xlUp)

Else

Sheets(i).UsedRange.Copy Sheets("合併資料").Cells(hrow + hrowc - 1, 1).Offset(1, 0)

End If

End If

Next i

End Sub

7、這樣，多個工作簿就合併成一個了。