作者:绿色风
分类:
时间:2022-08-17
浏览:133
楼主 悟空师弟 |
Q:如何自定义隔行求和的函数? A:代码如下:
- Function ghSUM(qy As Range, h As Integer)
- Dim y As Range
- Dim z As Integer
- For Each y In qy
- z = z + 1
- If z Mod (h + 1) = 1 Then
- ghSUM = ghSUM + y
- End If
- Next y
- End Function
函数用法: =ghSUM(参数1,参数2) 参数1为要求和的区域; 参数2为需要间隔的行数。 如: =ghsum(A1:A11,2) 意思为A1:A11这个区域中每隔两2行进行求和。
详见附件: 如何自定义隔行求和的函数?.rar |
2楼 悟空师弟 |
补充: 参数1的区域范围只能是单行, 参数2不能为0(即不隔行,因为不隔行求和可以直接用SUM函数),更不能为负数,因为隔负数行无意义! |
3楼 kevinchengcw |
原来还可以这样 |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素,
经与ExcelTip.Net站长Apolloh商议并征得其同意,
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示,
供有需要的人士查询使用,也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议,
可与本人沟通提出,或于本站点留言,我们会尽快处理。
在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一