1樓：一點設計演示
1、原始資料所在工作簿包含多個格式相同的工作表，只不過每個工作表內容不同，比如說不同人名的工作表資料或者不同部門填寫的資料。
2、原始資料所在工作簿包含多個格式相同的工作表，只不過每個工作表內容不同，比如說不同人名的工作表資料或者不同部門填寫的資料。
3、按alt+f11進入vba**編輯和除錯介面。
4、根據下圖提示，插入一個模組。
5、將下述**貼上到模組空白處：
sub combinesheetscells()
dim wsnewworksheet as worksheet
dim cel as range
dim datasource, rowtitle, columntitle, sourcedatarows, sourcedatacolumns as variant
dim titlerow, titlecolumn as range
dim num as integer
dim datarows as long
datarows = 1
dim titlearr()
dim choice
dim myname$, myfilename$, activesheetname$, addressall$, addressrow$, addresscolumn$, filedir$, datasheet$, mydelimiter$
dim n, i
n = 1
i = 1
worksheets("合併彙總表").delete
set wsnewworksheet = worksheets.add(, after:=worksheets(worksheets.count))
wsnewworksheet.name = "合併彙總表"
if myfilename = "false" then
msgbox "沒有選擇檔案！請重新選擇一個被合併檔案！", vbinformation, "取消"
else
workbooks.open filename:=myfilename
num = activeworkbook.sheets.count
myname = activeworkbook.name
addressall = datasource.address
activeworkbook.activesheet.range(addressall).select
sourcedatarows = selection.rows.count
sourcedatacolumns = selection.columns.count
for i = 1 to num
activeworkbook.sheets(i).activate
activeworkbook.sheets(i).range(addressall).select
selection.copy
activesheetname = activeworkbook.activesheet.name
workbooks(thisworkbook.name).activate
activeworkbook.sheets("合併彙總表").select
activeworkbook.sheets("合併彙總表").range("a" & datarows).value = activesheetname
activeworkbook.sheets("合併彙總表").range(cells(datarows, 2), cells(datarows, 2)).select
selection.pastespecial paste:=xlpastecolumnwidths, operation:=xlnone, _
skipblanks:=false, transpose:=false
selection.pastespecial paste:=xlpasteall, operation:=xlnone, skipblanks:= _
false, transpose:=false
selection.pastespecial paste:=xlpastevalues, operation:=xlnone, skipblanks _
:=false, transpose:=false
datarows = datarows + sourcedatarows
workbooks(myname).activate
next i
end if
workbooks(myname).close
end sub
6、在「首頁」工作表中按下圖示範插入一個窗體控制元件並指定巨集為插入的**名稱。
7、點選「首頁」工作表中插入的按鈕，根據提示，瀏覽到原始資料工作簿。
8、下一步，用滑鼠選擇要合併的資料範圍。
注意：每個工作表資料可能不一樣，比如說有的是10行資料，有的是30行資料。在這裡我們可以用滑鼠選擇任意工作表的一個較大範圍，比如說a1:
d100，保證比最多行數的工作表資料還多就可以，一會再刪除空行。
9、點選確定按鈕，待**執行完畢後，所有的資料就都合併到了「合併彙總表」中。
注意：1）a列的文字說明右側的資料來自於原始資料表的哪個工作表；
2）資料之間會有一些空行，下面通過篩選刪除。
10、選中全部資料區域，執行自動篩選。然後選擇其中一個欄位，選擇「空白」和標題內容。
11、然後將篩選出來的無用行滑鼠右鍵刪除，再刪除a列整列即可，完成效果如下圖：
2樓：蹲在路邊的鬼
sub combineworkbooks()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).selectrange("a" & n).activateselection.copy
sheets(1).select
range("a" & o + 1).selectactivesheet.paste
next
end sub
特別注意這一段字元「for m = 2 to 6」，由於要彙總的資料的工作表有5個，加上「合併報表」這個工作表本身，一共是6個工作表，因此「for m = 2 to 6」中選擇輸入6，如果後面要彙總的資料工作表有3個，則是錄入4，如果有12個，則是錄入13，依次類推。
3樓：
是不是你的題目打錯字了？工作表到工作表複製就行啦。
如何將一個excel裡面的多個sheet快速的合併到一個sheet裡面？
4樓：小執著
1、首先，提前把所有錄入的資料先輸入工作表中。
2、然後，新建一個sheet4工作表，目的是為了把前三個工作表的內容合併到表4中。
4、在**視窗中，輸入以下**，然後點選工具欄上面的執行就會把三個工作表自動合成在工作表4中了。
5、完成後效果如圖所示，記住要在office軟體下操作才可以
5樓：wps官方
以wps 2019版本為例：
1、開啟「**（excel）」文件；
2、點選「資料-合併**-多個工作表合併成一個工作表」；
3、勾選需合併的工作表即可。
6樓：雲淡風輕微課堂
5分鐘學會在excel中如何把多個工作表合併成一個表 n常用的技能
7樓：
使用下面的方式會更方便，不需要**：
新建一個空檔案，選擇需要合併的檔案到空檔案
8樓：匿名使用者
你沒有問錯吧！
sheet 合併了 內容咋辦哦
excel如何將兩個或多個工作表合併成一個工作表
9樓：逗比耶魯
操作步驟如下：
1.新建空白excel文件，選擇」插入「；
2.選擇」插入「頁面的有上角的」物件「；
3.在彈出的視窗中選擇「由檔案建立」；
4.在該頁面選擇「瀏覽」；
5.然後選擇需要合併的文件，單擊「插入」；
6.然後會彈出如下介面，選擇「確定」；
7.這樣就成功的將多個**合併到一個**裡了。
10樓：辦公小易
如何將一張工作表拆分成多個工作表？
11樓：綠衣人敲門
開啟想要合併的2個或多個工作簿---選中下面所有工作表(可以按住ctrl進行多項)，單擊右鍵---移動或複製工作表---在彈出的對話方塊中選擇想要複製到的工作簿路徑即可合併到一起了。
12樓：魚木混豬喲
可以利用vba快速將多個工作表合併為一個
軟體版本：office2007
方法如下：
1.有多個格式一致，內容不一的工作表，將內容彙總到總表中：
2.alt+f11，在總表中，輸入**如下：
**管家註釋已給出，根據情況修改單元格地址即可3.返回excel，就看到總表中已經彙總好了資料:
13樓：匿名使用者
1、有二個工作簿，每一個工作簿中都有若干個工作表，在做合併之前，我們要將這兩個工作表開啟。
2、在其中一個工作簿選擇所有的工作表，方法是先選擇第一個工作表，按住shift鍵，然後點最後一個工作表，這樣就可以快速全部選中
3、當然，你也可以右擊任意一工作表，在彈出的選單中選擇「選定全部工作表」選擇所有的工作表
4、右擊工作表標籤，在彈出的選單中選擇「移動或複製工作表」在第一個下拉框中選擇另一個要合併的工作簿。
5、這樣就可以快速將當前工作簿的所有工作表合併到另外一個工作簿了
如何將兩個的excel工作表合併在一個excel中，就是合併成sheet1，sheet2
14樓：
兩個工作表的話，可以通過標籤欄的複製或移動功能把一個工作表複製入另一個表內，具體操作步驟如下：
所需材料：excel。
一、首先在同一個視窗內開啟表1和表2，進入表1內，然後右鍵點選表1多餘的標籤。
二、 彈出選單內點選「刪除」，把多餘的兩個表刪除。
三、然後進入表2，右鍵點選sheet，選單內點選移動或複製工作表。
四、點選箭頭，下拉選單內點選表1。
五、接著勾選建立副本，點選移至最後，點選確定。
六、這樣就可以把表2的sheet1複製一個副本入表1了。
15樓：緬甸花梨***
將兩個excel合併在一個方法如下：
先開啟sheet1，將內容複製黏貼到sheet1
新增一個頁面，將第二頁記憶體黏貼到sheet2，如圖所示，按+號可新增多個頁面：
如何在EXCEL中將多個單元格內容合併到單元格中
對於將多個字串聯在一起的，可以使用concatenate函式或者用 連線符 如下圖 因此公式為 concatenate a1,b1,c1,d1,e1,f1 或者 a1 b1 c1 d1 e1 f1 唯一缺點就是需要逐個單元格的選擇 延展說明 concatenate 函式可將最多 255 個文字字串合...
如何批量修改excel多個工作表的指定名稱
其實巨集並不難，按alt f11，複製貼上下面的 然後執行巨集shtnamemodify。subshtnamemodify dimi asinteger fori 1 tosheets.count sheets i name i next iendsub 如何批量修改excel多個工作表的指定名稱 ...
如何將Excel工作簿中的多個工作表合併成工作表
方法 步驟 如圖 有二個工作簿，每一個工作簿中都有若干個工作表，在做合併之前，我們要將這兩個工作表開啟。在其中一個工作簿選擇所有的工作表，方法是先選擇第一個工作表，按住shift鍵，然後點最後一個工作表，這樣就可以快速全部選中 當然，你也可以右擊任意一工作表，在彈出的選單中選擇 選定全部工作表 選擇...