如何在EXCEL文件中把一个工作簿中的所有工作表数据汇总，表格内容全部一样。 如何把excel工作簿中多个工作表的某一列的数据都汇总到一个...
建三维引用
单击要在其中输入函数的单元格。
键入 =（等号），再输入函数名称，然后键入左括号。
单击要引用的第一张工作表的标签。
按住 Shift 并单击要引用的最后一张工作表的标签。
选择要引用的单元格或单元格区域。
完成公式，然后按 Enter。
您可以在三维引用中使用以下函数：
函数 说明
SUM 将数值相加。
AVERAGE 计算数值的平均值（算术平均值）。
AVERAGEA 计算数值（包括文本和逻辑值）的平均值（算术平均值）。
COUNT 统计包含数值的单元格数。
COUNTA 统计非空单元格数。
MAX 查找一组数值中的最大值。
MAXA 查找一组数值中的最大值（包括文本和逻辑值）。
MIN 查找一组数值中的最小值。
MINA 查找一组数值中的最小值（包括文本和逻辑值）。
PRODUCT 将数值相乘。
STDEV 基于样本计算标准偏差。
STDEVA 基于样本（包括文本和逻辑值）计算标准偏差。
STDEVP 计算总体的标准偏差。
STDEVPA 计算总体（包括文本和逻辑值）的标准偏差。
VAR 基于样本估算方差。
VARA 基于样本（包括文本和逻辑值）估算方差。
VARP 计算总体的方差。
VARPA 计算总体（包括文本和逻辑值）的方差。
用VBA代码，下面的代码可以选择是否有表头
Alt+F11，打开VBA编辑器，将下面的代码复制到编辑器里面。保存
Alt+F8 选择执行
如果需要现成的文件，请留下联系邮箱，我发给你。
Sub Combine_data()
'
' Combine_data Macro
'
Dim source, target As String
Dim s As Worksheet
Dim tr As Double
Dim SheetHeader As String
OpenFN = Workbooks.Application.GetOpenFilename
If OpenFN = False Then Exit Sub
Workbooks.Open OpenFN
SheetHeader = MsgBox("是否有表头？", vbYesNo)
Application.ScreenUpdating = False
source = ActiveWorkbook.Name
Workbooks.Add
target = ActiveWorkbook.Name
If SheetHeader = vbYes Then
RowStart = 2
tr = 2
Windows(source).Activate
Rows("1:1").Select
Selection.Copy
Windows(target).Activate
Range("A" & 1).Select
ActiveSheet.Paste
ElseIf SheetHeader = vbNo Then
RowStart = 1
tr = 1
End If
Windows(source).Activate
For Each s In ActiveWorkbook.Sheets
Sheets(s.Name).Select
lr = LastCell(ActiveSheet).Row
Rows(RowStart & ":" & lr).Select
Selection.Copy
Windows(target).Activate
Range("A" & tr).Select
ActiveSheet.Paste
If SheetHeader = vbYes Then
tr = tr + lr - 1
ElseIf SheetHeader = vbNo Then
tr = tr + lr
End If
Windows(source).Activate
Next
Application.DisplayAlerts = False
Workbooks(source).Close savechanges:=False
' Application.CutCopyMode = False
Application.ScreenUpdating = True
MsgBox "合并完成！"
'
End Sub
Function LastCell(ws As Worksheet) As Range
Dim LastRow&, LastCol%
On Error Resume Next
With ws
' Find the last real row
LastRow& = .Cells.Find(What:="*", _
SearchDirection:=xlPrevious, _
SearchOrder:=xlByRows).Row
' Find the last real column
LastCol% = .Cells.Find(What:="*", _
SearchDirection:=xlPrevious, _
SearchOrder:=xlByColumns).Column
End With
Set LastCell = ws.Cells(LastRow&, LastCol%)
End Function
1.函数处理：
在汇总表中输入对应的公式，如：每个表的C1求和，在汇总表中输入公式如下
=sum(sheet1:sheet10!C1)这样就把sheet1到10表中的C1相加了，其他单元格同理
2.VBA方法：
可用在工作表中循环相加处理，具体情况根据你的表格设计而定。
~
在Excel表格中如何把查找出来的数据给复制到另一个工作表中?
答：1.在sheet1中先写好筛选条件，点开文件复制的目标excel（本文是sheet2），最上面工具栏中点“数据”，找到筛选旁边的“高级”选项，跳出“高级筛选”框 2.选中“将筛选结果复制到其他位置”，然后“列表区域”选中sheet1中的原始数据，“条件区域”选中sheet1中我们提前写好的条件，“复制到”选中sheet2...
在EXCEL中如何在一个工作溥中设置的打印格式应用到所有工作表?
答：1、电脑打开Excel表格。2、电脑打开Excel表格后，按打印快捷键Ctrl+P进入打印页面。3、按打印快捷键Ctrl+P进入打印页面后，在设置中把打印活动工作表改为发音整个工作簿，然后再进入设置打印格式就可以了。
如何将两个的Excel工作表合并在一个Excel中,就是合并成Sheet1...
答：两个工作表的话，可以通过标签栏的复制或移动功能把一个工作表复制入另一个表内，具体操作步骤如下：所需材料：Excel。一、首先在同一个窗口内打开表1和表2，进入表1内，然后右键点击表1多余的标签。二、 弹出菜单内点击“删除”，把多余的两个表删除。三、然后进入表2，右键点击Sheet，菜单内点击...
Excel 如何在一个表格中套用另一个表格内容
答：在用Excel处理数据时，有时需要在当前工作中引用其它工作表的数据，当其它工作表中的数据发生变化时，当前工作表中引用的数据也会自动发生改变。这个可以通过Excel的引用功能轻松地实现。具体操作方法如下：操作工具：电脑wi7，Excel2010 1、打开一个工作薄，在此工作薄中有两个工作表，一个是“2018年”...
如何把excel中的Sheet1插入到另一个工作表中作为Sheet2?
答：把excel中的Sheet1插入到另一个工作表中作为Sheet2，只需要同时打开两个工作表，按住“Ctrl”键同时按住表格1的Sheet1拖动到表格2即可。方法步骤如下：1、分别打开需要操作的EXCEL表格1和表格2，点击右上角的“还原”按钮，把工作表缩小。2、两个工作表缩小到同一界面方便操作，点击表格1的Sheet1同时按...
如何将多个文件合并在一个excel文件中?
答：在excel表格中点击【数据】中的【合并表格】，选择合并方式为【多个工作表合并成一个工作表】。点击【添加文件】，添加完成点击【开始合并】，在【报告】页可看到合并的数据情况。点击【总表】，即可看到合并后的表格内容，详细步骤：1、打开excel表格，点击菜单栏的【数据】选项。2、在下方，找到【合并...
把excel一个工作簿中多个工作表的特定位置合并在一个表中
答：FileStr = Dir()Wend If n = 0 Then MsgBox "没发现excel文件": Exit Sub Set ActiveWb = ActiveWorkbook HeadRows = Application.InputBox("请确认待合并工作簿的标题行数，改行将产生在合并工作表中作为新的标题行： ", "标题行", 1, , , , , 1)If HeadRows < 1 Then Exit Sub Rang...
如何把excel表格中的所有工作表中的其中一个数据合计在最后一个工作表...
答：1、要把sheet1到sheet4的数据求和汇总到汇总表中，要汇总起来的话，sheet1到sheet4以及汇总表的数据格式必须是一致的。2、选中汇总表中需要汇总的数据区域。3、在框内输入公式=sum(sheet1:sheet4!b3) 。4、sum表示求和，sheet1:sheet4表示表1到表4，b3表示求和数据所在的单元格。5、公式输入...
怎么把excel不同的工作表中的某行汇总到一个新工作表中
答：strFileName = Dir Loop Application.DisplayAlerts = False wb.Sheets(1).Delete Application.DisplayAlerts = True Application.ScreenUpdating = True Set wb = Nothing End Sub 当你录制宏时，可以将它保存在个人宏工作簿里面。当你储存宏在个人宏工作簿里时，Excel创建一个名为“Personal.xls”的...
一个Excel工作簿中的多个工作表怎么拆分成独立表格
答：一个Excel工作簿中的多个工作表想拆分成独立表格，首先打开表格找到并选中表格右下角的表一，然后，点击右键选择“移动或复制工作表”，然后，打开工作薄点击新工作薄，然后，点击确定，然后点击保存，打开保存界面后再点击“保存”（喜欢保存到哪里请根据自己的需求），这样表一就保存下来了。保存表二跟...
