代码写法上一点问题都没有，S定义为LONG也足够了
只是用循环，数据多了速度就慢了，建议还是直接用SUM函数
Sub mysum2()
MsgBox ("所选区域求和：" & Application.Sum(Selection))
End Sub
问题太多，都不知道说哪句不对 了
For Each i In Selection---selection对象不支持这种用法，况且i是一个range对象，selection本身也可能是一个range，for each 无用
i.value也不符合规范，在excel中，如果range对象刚好是一个单元格，还可以用，其它情况就会出错
基本无误，
只是在超过long范围的数值会报错，建议不要定义s的类型
内容全部来源于网络收集，如有侵权，请联系网站删除！
QQ：24596024