如何在excel创建一个数组求和之后再向下取整的新函数

可以利用VBA编写自定义函数，实现在excel创建一个数组求和之后再向下取整的新函数
软件版本：Office2007
方法如下：
1.Alt+F11，打开VBE界面，在左侧图示空白处，点击右键，插入模块：
2.模块中输入如下代码：
Function
新公式(x
As
Range)
For
Each
r
In
x
t
=
t
+
r.Value
Next
新公式
=
Int(t)
End
Function
3.回到Excel中，使用自定义的新公式函数，就可以求出数组求和之后再向下取整的结果：