1.需求：计算所选中区域之和

2.代码

Sub 计算所选中区域之和()Dim r
Dim t As Double
For Each r In SelectionIf IsNumeric(r.Value) Thent = t + r.ValueEnd If
Next
MsgBox "所选区域数值之和为：" & t
End Sub

3. 效果

16.Excel vba开发-计算所选中区域之和相关推荐

Excel VBA开发自动发送邮件
一..设置Outlook邮箱帐(略不是本文章的重点) 二..设置Outlook信任中心如下步骤若没有做如下操作设置,则Excel VBA调用Outlook自动发送邮件时提示如下 2.1 Outloo ...
Excel VBA开发中数字签名的管理
Excel 禁用无数字签署的宏网上下载的Excel文件可能含有宏病毒,因此打开Excel文件时最好不要轻易启动宏,同时为了不让"启动宏"的提示每次出现,可以在Excel设置中提高 ...
【一】Excel VBA开发初探
一.启用Excel VBA开发功能 1.点击Excel左上角的[文件],然后点击文件下方的[选项] 2.[Excel选项]中点击[自定义功能区],右边勾选[开发工具],点击[确定] 3.返回excel ...
Excel收纳箱：返回选中区域的行数和列数
今天小编要和大家分享的是,Exce收纳箱:VBA操作返回选中区域的行数和列数 (方方格子插件) 1.动图演示 2.选择diy工具箱 3.选择收纳箱命令按钮 4.选择本地新建命令 5.弹出对话框在代 ...
Excel vba开发合并单元格拆分自动填充功能、在每一条数据后面插入空白行、将地理坐标的经纬度转换成度等功能
写在前面: 最近老大丢给我一个数据量比较大,比较复杂的表,让我用VB去处理,刚被分到这个任务的时候一脸茫然,对Excel VB开发一点都不了解,所以就自己研究并查资料,最后终于解决了. 一.Excel ...
Excel正则表达式：提取选中区域正数负数和小数
今天小编要和大家分享的是,Excel如何利用正则表达式,去提取选中区域的正数.负数.和小数的操作 (方方格子插件) 1.动图演示如下 2.为了做一个对比效果,我们可以复制一列数据出来 3.然后呢我们选 ...
Excel如何快速对选中区域截图？
1.首先我们选中要截取图片的单元格区域 2.接着我们鼠标点击[图片工具]选项 3.选择[选区截图] 4.鼠标点击如下图选项 5.最后我们点击粘贴即可完成 6.完成效果如下图
1.Excel vba开发-处理空格数据
需求:excel表格数据中有的表格存在多余的空格,需要删除多余的空格. 代码 '清除所有sheet页中单元格两端的空格 Public Sub trimCell()Dim sheetCount, col ...
11.Excel vba开发-根据已有名称，创建新建表格
1.需求:根据已有名称,创建新建表格 2.代码: Sub 创建表格1() '不在一个表格里 Application.ScreenUpdating = False r = [a1].CurrentReg ...

16.Excel vba开发-计算所选中区域之和

1.需求：计算所选中区域之和

2.代码

3. 效果

16.Excel vba开发-计算所选中区域之和相关推荐

最新文章

热门文章