excel自动累加实例两则

excel自动累加案例一

　　excel自动累加的方法很简单，可以套用这样的格式：=sum(开始单元格：结束单元格)。
如下图所示：A2为2，A3为5，当自动累加就应该是7，A4为3，对应的自动累加的结果就是10。

　　我们在B2中输入公式：=SUM(A$2:A2)，下拉复制公式即可。公式的核心就是单元格的绝对和相对引用的学习。SUM开始单元格为绝对引用，结束单元格为相对引用，随下拉而自动变化，从而实现自动累加的范围逐一增大。

　　相关文章：excel累加求和和计数方法http://www.ittribalwo.com/show.asp?id=1232

excel自动累加案例二

　　A列是些不规范录入的采购清单，文本和数字混合，导致求和难度增加。思路就是先将A列相关的数字金额提取出来，然后再使用SUM进行自动累加求和。

　　B2单元格的公式为自定义函数，其中的代码如下：

Function CountNums(rng As Range)
Dim X As Integer
For X = 1 To VBA.Len(rng)     '将单元格中的数字取出后累加
If Mid(rng, X, 1) Like "[0-9]" Then
CountNums = CountNums + Val(Mid(rng, X, Len(rng)))
X = X + Len(Evaluate(Val(Mid(rng, X, Len(rng)))))
End If
Next X
End Function

　　关于自定义函数的使用，参考文章：http://www.ittribalwo.com/show.asp?id=1274