常用VBA编程代码--数据加总

1、打开一个excel，新建一个文档

2、打开visual basic编辑器，开启一个模块

3、复制下面的代码：

Sub sumselection()

For Each x In Selection
s = s + x
Next
MsgBox ("所选单元格总和为：" & s)
End Sub

4、保存在工作簿中，就可以随时待用

5、或者保存为加载宏，可以发送使用。

6、