如何汇总每个sheet的数据

汇总Excel中每个工作表（sheet）的数据，可以通过以下几种方法实现：

使用Excel内置功能

1. 使用“数据透视表”：

选择包含所有工作表数据的第一个工作表。

在“插入”选项卡中，点击“数据透视表”。

在弹出的对话框中，选择“新工作表”或“现有工作表”，并将数据透视表放置在新的工作表中。

在数据透视表字段列表中，将需要汇总的字段拖动到行、列、值等区域。

2. 使用“合并计算”：

在包含所有工作表数据的第一个工作表中，选择需要放置汇总结果的位置。

在“数据”选项卡中，点击“合并计算”。

在弹出的对话框中，选择“引用位置”，点击“添加”，然后选择包含所有工作表数据的第一个工作表。

选择要汇总的数据区域，点击“确定”。

使用VBA宏

1. 打开Excel，按下`Alt + F11`打开VBA编辑器。

2. 在“插入”菜单中选择“模块”，在打开的模块窗口中输入以下代码：

```vba

Sub SummarizeSheets()

Dim ws As Worksheet

Dim summaryWs As Worksheet

Dim lastRow As Long, i As Long, j As Long

Dim summaryRow As Long

' 创建汇总工作表

Set summaryWs = ThisWorkbook.Sheets.Add

summaryWs.Name = "Summary"

' 获取第一个工作表的数据区域

Set ws = ThisWorkbook.Sheets(1)

lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row

' 将第一个工作表的数据标题复制到汇总工作表

For i = 1 To ws.UsedRange.Columns.Count

summaryWs.Cells(1, i).Value = ws.Cells(1, i).Value

Next i

' 遍历所有工作表

For i = 2 To ThisWorkbook.Sheets.Count

Set ws = ThisWorkbook.Sheets(i)

summaryRow = summaryWs.Cells(summaryWs.Rows.Count, 1).End(xlUp).Row + 1

' 将当前工作表的数据复制到汇总工作表

For j = 1 To ws.UsedRange.Rows.Count

For k = 1 To ws.UsedRange.Columns.Count

summaryWs.Cells(summaryRow + j 1, k).Value = ws.Cells(j, k).Value

Next k

Next j

Next i

' 汇总数据

For i = 1 To summaryWs.UsedRange.Columns.Count

summaryWs.Cells(summaryWs.Rows.Count, i).Value = Application.WorksheetFunction.Sum(summaryWs.Range(summaryWs.Cells(2, i), summaryWs.Cells(summaryWs.Rows.Count, i)))

Next i

End Sub

```

3. 按下`F5`运行宏。

使用Python

1. 安装`pandas`和`openpyxl`库：

```bash

pip install pandas openpyxl

```

2. 编写Python代码：

```python

import pandas as pd

读取所有工作表

xls = pd.ExcelFile('your_file.xlsx')

sheets = xls.sheet_names

创建汇总DataFrame

summary_df = pd.DataFrame()

遍历所有工作表

for sheet in sheets:

df = pd.read_excel(xls, sheet_name=sheet)

summary_df = pd.concat([summary_df, df], ignore_index=True)

保存汇总数据到新的Excel文件

summary_df.to_excel('summary.xlsx', index=False)

```

3. 运行Python脚本。

以上方法可以根据你的需求选择使用。希望对你有所帮助！