excel不同表格汇总.docVIP

excel不同表格汇总 篇一：EXCEL工作簿中不同工作表数据如何汇总(一个简单函数搞定) 如何汇总多个工作表数据 如下表，如何在汇总表中的工资总额中汇总财务部各员工的工资总和？ 【解答】 在汇总表B2中输入=SUM(第一张子表名:最后一张子表名!B2)就可以了,以后只要在第一张子表和最后一张子表之间任意删除或者增加表数据都自动计算,删除不会出现引用失效的结果。 篇二：关于excel多表格内容汇总到一个表中的问题 关于excel多表格内容汇总到一个表中的问题 怎么快速把每天的车辆运行起点和终点汇总到一个表格内？ 答案： 请在汇总表中的B3输入公式： =IF(ISNA(VLOOKUP($A3,INDIRECT(#39;amp;B$1amp;#39;!$A:$F),5,0)),,VLOOKUP($A3,INDIRECT(#39;amp;B$1amp;#39;!$A:$F),5,0)) 在C3输入公式： =IF(ISNA(VLOOKUP($A3,INDIRECT(#39;amp;B$1amp;#39;!$A:$F),6,0)),,VLOOKUP($A3,INDIRECT(#39;amp;B$1amp;#39;!$A:$F),6,0)) 然后将B3:C3向右拉自动填充复制，再向下拉自动填充复制即可。 篇三：关于Excel不同工作表数据汇总显示 关于Excel不同工作表数据汇总显示 [ 标签：excel, 工作表数据, xsl ] 7 2009-06-11 00:44 Excel数据整理的时候,由于统计需要把数据按工作表分类.现在又需要将所有工作表的内容,汇总到一个工作表中进行综合留底.现有一个工作薄中最少都有10+个工作表,有什么方式可以快速、自动汇总这些数据显示吗?(所有工作表中的结构一样,数据不一样。想要的结果只是将数据全部集中显示,而不是汇总求和)..望有达人解决,不胜感激 问题补充：如图中建立一个新工作表，在该工作表中工作表6.1后自动接工作表 6.2... 问题补充：在飘的耐心指导下,问题已经得到解决..为了方便以后有相同问题的朋友参阅这段代码,我将问题再补充一下：当时我在A文件夹下有1-N个工作薄,需要将所有工作薄中的所有工作表内所有内容集合到一个新的工作表中(纯数据集中处理,不涉及统计、排序、计算等等),具体宏代码视情况而定..一段小小的宏,节约了大约一周的时间,惭愧惭愧.. 满意答案 是否将各表的内容复制到要汇总的表中？ 若是这样的话，只能用宏代码了 若是这样加我，可以给代码 继续追问： 嗯.就是将各表的内容复制到要汇总的表中..看来还是有方法可以实现的,请教一下了 补充回答： 一般的方法就是两种：公式与宏 在这边是无法用公式的，所以只能用宏，且宏代码不会长 补充回答： 代码如下，但还有部份要设置，在此无法细说： Sub 汇总()(来自:WwW.xltkwJ.cOm 小龙 文档 网:excel不同表格汇总) Dim LJ, bwj, bb, fs, f, f1, fc, I, J, K, L, HS, LS, wj, bm, A, B Set bwj = ActiveWorkbook Set bb = bwj.ActiveSheet LJ = bwj.Path Set fs = CreateObject(Scripting.FileSystemObject) Set f = fs.GetFolder(LJ) Set fc = f.Files A = 2 For Each f1 In fc If Right(f1, 3) = xls Or Right(f1, 3) = XLS Then If f1.Name lt; bwj.Name Then Workbooks.Open LJ amp; \ amp; f1.Name Set wj = ActiveWorkbook For Each I In Worksheets I.Select Set bm = I ActiveCell.SpecialCells(xlLastCell).Select HS = ActiveCell.Row #39;LS = ActiveCell.Column LS = 5: C = 0 For J = 1 To HS A = A + 1 bb.Cells(A, 1) = f1.Name bb.Cells(A, 2) = bm.Name For K = 1 To LS bb.Cells(A, K + 2) = bm.Cells(J, K) A1: Next K Next J Next I wj.Close False End If End