合并表步驟1：一個工作簿里面有多個工作表，各工作表之間的字段是一致的，但數(shù)據(jù)不一致。由于工作需要，需要將各個工作表的數(shù)據(jù)匯總到一個表格里面做匯總分析，數(shù)據(jù)少、工作表數(shù)目不多的時候，CTRL+C后CTRL+V逐個復(fù)制粘貼是可以的，但數(shù)據(jù)量大、工作表數(shù)據(jù)多的時候，則可以用宏進行快速處理;

‍

合并表步驟2：從上圖中，后面的5個工作表，里面是源數(shù)據(jù)�！昂喜�報表”這個表，則是要將后面5個表格的數(shù)據(jù)匯總的表格，其內(nèi)容為空。

合并表步驟3：方法：使用宏快速匯總：

(1)錄制宏：首先，點擊文件菜單的“工具”菜單，選擇“宏”—“宏”

合并表步驟4：出現(xiàn)以下的宏界面，在“宏名”中按照自己喜好錄入一個名稱，這里錄入“合并工作表”的名稱，“位置”是指該宏可以在那個EXCEL工作簿中使用，這里選擇“當(dāng)前工作簿”。然后點擊“創(chuàng)建”。

合并表步驟5：出現(xiàn)以下的宏錄入界面

Sub 合并工作表()”下面，將以下的字符復(fù)制粘貼過去

Dim m As Integer Dim n As Integer Dim o As Integer For m = 2 To 6

n = Sheets(m).[a65536].End(xlUp).Row o = Sheets(1).[a65536].End(xlUp).Row Sheets(m).Select

Range("a1", "z" & n).Select Range("a" & n).Activate Selection.Copy Sheets(1).Select

Range("a" & o + 1).Select ActiveSheet.Paste Next

合并表步驟6：特別注意這一段字符“For m = 2 To 6”，由于要匯總的數(shù)據(jù)的工作表有5個，加上“合并報表”這個工作表本身，一共是6個工作表，因此“For m = 2 To 6”中選擇輸入6，如果后面要匯總的數(shù)據(jù)工作表有3個，則是錄入4，如果有12個，則是錄入13，依次類推。

合并表步驟7：然后，點擊“文件”菜單，選擇“關(guān)閉并返回到Micrlsoft Excel”。宏至此錄入完畢。

(2)使用已錄制好的宏“合并工作表”，進行工作表的數(shù)據(jù)匯總。首先，在“合并報表”中，點擊點擊文件菜單的“工具”菜單，選擇“宏”—“宏”

合并表步驟8：出現(xiàn)宏界面，點擊選擇“合并工作表”，然后點擊“執(zhí)行”。就能達到匯總的效果。要注意，為避免出錯，最好檢查以下匯總后的報表中有數(shù)據(jù)的行數(shù)，是否等于后面各個報表有數(shù)據(jù)的行數(shù)總和。

合并表步驟9：另外要注意，已經(jīng)使用宏的報表，在保存時，會出現(xiàn)以下提示，點擊確定即可。