Excel一键实现所选区域相同颜色单元格求和技巧

      经由过程VBA实现对所选区域内 , 填充了不异颜色的单位格进行乞降 , 然后设置经由过程按钮来实现代码的运行 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

需要这些哦
Excel(教程以Excel2007为例)
方式/
1本教材以下图数据为例 , 求黄色填充单位格的数值之和 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

2绘制计较按钮 , 经由过程插入一张图片或者一个外形实现 , 本教材以插入一个矩形外形为例 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

3编纂外形文字 , 最好是设置当作那种比力轻易理解 。 本教材编纂文字为:黄色填充单位格之和 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

4设置外形的轮廓以及外形外形结果 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

5从Excel界面进入VBA界面 , 不清晰操作流程的可以参考以下链接:
【Excel一键实现所选区域相同颜色单元格求和技巧】11Excel2007打开VBA的三种方式!

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

6插入一个模块 , 在模块中输入如下代码:
Sub qiuhe()
Dim rng As Range
Dim s As Long
 s = 0
For Each rng In Selection
 If rng.Interior.Color = 65535 Then   '单位格填充色为黄色就执行下一步
  s = s + rng.Value
  If
Next
 MsgBox "所选区域黄色填充单位格的数值之和为 " & s
Sub

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

7返回Excel窗口 , 设置按钮指定宏为以上代码 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

8选择需要乞降的区域 , 点击按钮即可求得黄色填充单位格之和 。

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

Excel一键实现所选区域相同颜色单元格求和技巧

文章插图

注重事项此法同样合用于乞降单位格中字体(字体颜色)不异 , 只需要改动一点代码即可 , 若是您感乐趣的话 , 不妨本身脱手尝尝 。

推荐阅读