Excel中公式那么多现成的公式，可以直接调用。

比自己重新造轮子要方便许多，另外听说自己造的轮子不一定有人家亲生的快。

Excel的公式与WorksheetFunction 对象下的方法对应。参数不熟悉的可以结合公式以及参考资料研究，很方便。

Sub test ()MsgBox Application.WorksheetFunction.Sum([A1:A10])End Sub|

参考资料

微软Docs 》Office VBA 参考 》Excel 》对象模型 》WorksheetFunction 对象