yhd-Excel函数多工作表汇总并求和
【问题】想把同一个文件中多个工作表中数据汇总并求和,不同的工作表的数据在不同的行
不同的工作表的数据在不同的行
怎么办呢!
思考一下,
思考一下,
思考一下,
思考一下,
【函数】如下
'=SUM(SUMIF(INDIRECT($B$4:$B$18&"!$B$4:$B$18"),B4,INDIRECT($B$4:$B$18&"!$C$4:$C$18"))) |
---|
=SUM(SUMIF(INDIRECT($B$4:$B$18&"!$B$4:$B$18"),B4,INDIRECT($B$4:$B$18&"!$D$4:$D$18")))三键哦 |
【解析】
1.SUMIF(条件区域,条件,求和区域)
2.INDIRECT引用函数
INDIRECT(B4:B18&"!B4:B18")引用“***工作中的B1:B18”区域,条件是B4鹿鼎记,
3. ,INDIRECT(B4:B18&"!C4:C18")引用“***工作中的C1:C18”区域进行求和
4.就是把各工作中B1:B18区域中的满足条件为“鹿鼎记”的数据求和,再把所有的和再sum求和。
============================
另附上在创造条件时用到的批量复制工作表的代码
Sub copysht()
Dim temp AsWorksheet
arr =Range("B4:B18")
For i = 1 ToUBound(arr, 1)
' ActiveWorkbook.ActiveSheet.Copy after:=Worksheets(Worksheets.Count)'可以执行
ActiveWorkbook.Sheets("汇总").Copy after:=Worksheets(Worksheets.Count) '可以执行
' ActiveSheet.Copy after:=ActiveSheet '可以执行
ActiveSheet.Name= arr(i, 1)
ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value
Next
End Sub
功能是复件当前的工作表,到后面再把其中的含有公式的数据全部转化为数值
====今天学习到此====