EXCEL统计多个文件表格里的数据
发布网友
发布时间：2022-04-23 06:56
共5个回答
热心网友
时间：2022-06-17 02:49
2、你在要将统计结果计入的单元格内（随便哪个单元格都行）点菜单栏插入/函数/SUM/确定。
3、会出现一个对话框，你将光标定位在Number1内，然后点击工作薄下面的工作表标签sheet2，再按住shift,再点击工作薄下面的最后一个工作表标签（sheet205）(比如你是205张工作表)，再点击要统计的单元格（比如C2），确定就可以了。
4、如果你还要把其他单元格的内容也统计到里面的话，那么你在第三步最后的确定不要点，点完C2后将光标移至Number2内，然后重复第3步的操作，只是最后要点击的是你要与前单元格一并统计的单元格（比如C6）。可以无穷多，最后确定。
不知你看明白没有。看不一定明白，你照着我的做一遍估计应该会了吧。
如果还不懂的话，那就白费我一番心血了。
给我加分吧。
热心网友
时间：2022-06-17 02:49
今天学习了下大家的方法，应该基本能满足你的需要，在这总结下，希望对你帮助：
一、合并所有的表到一个工作薄里，便于以后的统计工作。
注意：在此之前，视你的统计表的数目情况而定，表越多，则越耗内存，所以尽可能关闭电脑上除Excel外的其它软件，或选择一台性能优秀的计算机进行统计工作。
1、1打开一个空白的Excel工作薄。单击菜单栏中的开发工具－>选择Visual Basic
热心网友
时间：2022-06-17 02:50
如果你的表的格式全部是一样的，且没有合并单元格的话，
倒可以编个VBA将所有表总部合并到一个表里再去统计就方便多了。
看了你的表里好像是有合并单元格的
Dim MyPath, MyName, AWbName
Dim Wb As Workbook, WbN As String
Dim g As Long
Dim Num, ini As Long
Dim i, m, n, a, b, c, d
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
Wb.Sheets(1).Range(Wb.Sheets(1).Cells(1, 1), Wb.Sheets(1).Cells(3, Wb.Sheets(1).UsedRange.Columns.Count)).Copy .Cells(1, 1)
Wb.Sheets(1).Range(Wb.Sheets(1).Cells(4, 1), Wb.Sheets(1).Cells(Wb.Sheets(1).UsedRange.Rows.Count, Wb.Sheets(1).UsedRange.Columns.Count)).Copy .Cells(.Range("A65536").End(xlUp).Row + 1, 1)
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Application.CutCopyMode = False
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"
寻制一个宏，将里面的内容换成上面代码。
然后将你要统计的所有的表放在同一个文件夹里，然后执行上面的宏
会将所有该文件夹内每个表的最左面的表从第四行开始从部合并到一个表内
这个就好统计了
热心网友
时间：2022-06-17 02:50
那么在总表里面（假设总表在最前一个表）选择你要汇总的一个项
输入
=SUM(
之后点总表后面的那个表的标签
再按住SHIFT，点最后一个表的标签，再点最后一个表总的那个对应的单元格
再输入）回车
结果的形式为
=SUM(SHEET2:SHEET50!C4)
其他单元格的就直接复制这个单元格的公式粘贴过去（注意，不是复制上里面的内容，直接复制粘贴就可以了）
热心网友
时间：2022-06-17 02:51
以前帮人做过类似的，如图片。
可将样表发送到我邮箱：nj-sky@qq.com
