當前位置:首頁 » 辦公資訊 » excel怎樣把每個工作表匯總出來

excel怎樣把每個工作表匯總出來

發布時間: 2022-05-17 05:18:37

A. 怎麼將多個excel表格裡面的工作簿匯總到一個excel裡面

工具/原料

Excel

操作步驟:

1、原始數據所在工作簿包含多個格式相同的工作表,只不過每個工作表內容不同,比如說不同人名的工作表數據或者不同部門填寫的數據。

excel怎樣把多個工作表匯總成1個工作表

2、在原始數據同目錄下新建一個工作簿,建立兩個工作表,名稱分別為「首頁」和「合並匯總表」。

excel怎樣把多個工作表匯總成1個工作表

excel怎樣把多個工作表匯總成1個工作表

3、按Alt+F11進入VBA代碼編輯和調試界面。

excel怎樣把多個工作表匯總成1個工作表

4、根據下圖提示,插入一個模塊。

excel怎樣把多個工作表匯總成1個工作表

excel怎樣把多個工作表匯總成1個工作表

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
Application.DisplayAlerts = False
Worksheets("合並匯總表").Delete
Set wsNewWorksheet = Worksheets.Add(, after:=Worksheets(Worksheets.Count))
wsNewWorksheet.Name = "合並匯總表"
MyFileName = Application.GetOpenFilename("Excel工作薄 (*.xls*),*.xls*")
If MyFileName = "False" Then
MsgBox "沒有選擇文件!請重新選擇一個被合並文件!", vbInformation, "取消"
Else
Workbooks.Open Filename:=MyFileName
Num = ActiveWorkbook.Sheets.Count
MyName = ActiveWorkbook.Name
Set DataSource = Application.InputBox(prompt:="請選擇要合並的數據區域:", Type:=8)
AddressAll = DataSource.Address
ActiveWorkbook.ActiveSheet.Range(AddressAll).Select
SourceDataRows = Selection.Rows.Count
SourceDataColumns = Selection.Columns.Count
Application.ScreenUpdating = False
Application.EnableEvents = False
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
Application.ScreenUpdating = True
Application.EnableEvents = True
End If
Workbooks(MyName).Close
End Sub

excel怎樣把多個工作表匯總成1個工作表

6、在「首頁」工作表中按下圖示範插入一個窗體控制項並指定宏為插入的代碼名稱。

excel怎樣把多個工作表匯總成1個工作表

excel怎樣把多個工作表匯總成1個工作表

7、點擊「首頁」工作表中插入的按鈕,根據提示,瀏覽到原始數據工作簿。

excel怎樣把多個工作表匯總成1個工作表

8、下一步,用滑鼠選擇要合並的數據范圍。

注意:每個工作表數據可能不一樣,比如說有的是10行數據,有的是30行數據。在這里我們可以用滑鼠選擇任意工作表的一個較大范圍,比如說A1:D100,保證比最多行數的工作表數據還多就可以,一會再刪除空行。

excel怎樣把多個工作表匯總成1個工作表

excel怎樣把多個工作表匯總成1個工作表

9、點擊確定按鈕,待代碼運行完畢後,所有的數據就都合並到了「合並匯總表」中。

注意:

1)A列的文本說明右側的數據來自於原始數據表的哪個工作表;

2)數據之間會有一些空行,下面通過篩選刪除。

excel怎樣把多個工作表匯總成1個工作表

10、選中全部數據區域,執行自動篩選。然後選擇其中一個欄位,選擇「空白」和標題內容。

excel怎樣把多個工作表匯總成1個工作表

11、然後將篩選出來的無用行滑鼠右鍵刪除,再刪除A列整列即可,完成效果如下圖:

excel怎樣把多個工作表匯總成1個工作表

excel怎樣把多個工作表匯總成1個工作表

END

以上就是excel如何快速把多個工作表合並到一個excel表的方法,大家看明白了嗎?希望能幫助到大家,謝謝大家閱讀本篇文章!

B. 如何快速把幾個excel匯總

點擊【數據】-【新建查詢】-【從文件】-【從工作簿】,將表格全部導入,勾選【選擇多項】,勾選工作表後點擊【轉換數據】,找到【追加查詢】,選中【三個或更多表】後將所有表格全部添加,點擊【確定】,最後點擊【關閉並上載】即可。

C. 如何將EXCEL多個工作表的相同內容自動匯總到一個工作表

摘要 您好,很高興為您解答

D. 怎麼把所有的excel表 匯總在一個表中

舉例說明:

1.工作簿中有多張工作表,A列和B列都有類似的數據,行數不同。
2.選中「匯總」表A1單元格,點擊【數據】-【合並計算】。
3.左上角選擇適當的運算方式,本例為「求和」。如下圖所示點擊選擇按鈕選擇數據。
4.選中第一張工作表數據,並點擊【添加】按鈕。
5.順序將其他工作表數據也添加進來。
6.由於原始數據第一行是標題,並且要以A列數據分類匯總,所以選中下面兩個選項。
7.確定後就在「匯總」表生成了每個人的「數量」匯總求和數據。
8.如果勾選【創建指向源數據的鏈接】則最終返回鏈接數據並匯總。
9.完成匯總效果如下。
10.點擊每個人旁邊的加號就可以看到匯總數據是從哪張工作表的哪個單元格引用過來的。

E. EXCEL2007 如何將幾個獨立的工作表數據自動匯總到一個總表上面

摘要 1.當前知工作簿中有多個工作表道,結構都一樣如下所示,當裡面的數據不一樣,將它們全部合並到當前工作表回中:

F. 怎麼將excel里每個sheet裡面的數據匯總

excel中是可以在一個sheet里引用另一個sheet里的數據的,比如在sheet1的A1單元格中輸入「=sheet2!b2」就可將sheet2中的B2單元格中的數據引用到sheet1的A1單元格中。寫好一個單元格後,可以拖動到其他單元格,公式中參數會自動平移。
看你給的圖片應該是每天一個sheet,你應該是想把每天的匯總成一個月的吧。那你就輸入「=11.25!b5+11.26!b5+11.27!b5+11.28!b5+11.29!b5+11.30!b5",再把這個拖動到其他單元格即可。
如果你每天的表格順序寫得都不一樣,那就比較麻煩了。需要先做一下格式整理。從excel公式的角度來說,分兩步,一是把商品引用到一列,二是用vlookup函數查找到對應數據。
你問得太簡單,我也是猜測你的意圖。不會excel公式的一些基礎操作的話,建議先另外學習一下。

G. 如何把excel中多個表格的內容匯總到一個表中

復制粘貼是一個基本的辦法,但數據多的時候很繁瑣,如果表中有公式或格式設置時,在粘貼時容易發生問題。
用vba是好辦法,但門檻高一些,不知道表名,表的結構就不好寫了。

H. 如何將一個excel中多個表格的數據匯總

如果是匯總一定是有相同項的吧,
首先要保證你要匯總的列的信息「全面」,然後用公式
sumif()就可以做到。
還有一種方法就是,將幾個表的數據復制到一張表上,然後用「數據透視表」,很方便。

I. excel表格下多個sheet內容怎麼匯總到一個表格中

摘要 您好,excel表格下多個sheet內容匯總到一個表格中,可使用鏈接功能實現。

J. 如何將excel中多個不同的工作表全部內容匯總成一張總表

1、打開excel表單,其中包含三個工作簿。分數以中文,數學和英語記錄。現在,您需要以一種形式匯總三個結果。

熱點內容
馬路上汽車的噪音在多少分貝 發布:2023-08-31 22:08:23 瀏覽:1495
應孕棒多少錢一盒 發布:2023-08-31 22:08:21 瀏覽:997
標准養老金一年能領多少錢 發布:2023-08-31 22:05:05 瀏覽:1296
湖北通城接網線多少錢一個月 發布:2023-08-31 21:59:51 瀏覽:1373
開隨車吊車多少錢一個月 發布:2023-08-31 21:55:06 瀏覽:1072
京東付尾款怎麼知道前多少名 發布:2023-08-31 21:52:58 瀏覽:1446
在學校租鋪面一個月要多少錢 發布:2023-08-31 21:52:09 瀏覽:1586
2寸有多少厘米 發布:2023-08-31 21:50:34 瀏覽:1214
知道電壓如何算一小時多少電 發布:2023-08-31 21:46:20 瀏覽:1200
金手鐲54號圈周長是多少厘米 發布:2023-08-31 21:44:28 瀏覽:1374