前言:
此刻朋友们对“for循环嵌套举例”大约比较关切,朋友们都需要分析一些“for循环嵌套举例”的相关知识。那么小编同时在网上汇集了一些有关“for循环嵌套举例””的相关内容,希望同学们能喜欢,我们一起来学习一下吧!第一种方法是用active插件
复制这段代码:
Dim x As Integer
Dim y As Integer
For x = 3 To 8 '行循环
For y = 2 To 6 '列循环
If Cells(x, y) < 60 Then 'IF判断条件
Cells(x, y).Interior.ColorIndex = 3 '满足条件添加背景色
End If '结束判断条件
Next y
Next x
效果如下:
第二种方法:利用工作表Worksheet_SelectionChange事件,来动态标注不及格分数的颜色。
1、复制代码
2、右键工作表名称---查看代码---WorkSheet--Worksheet_SelectionChange
效果如下:
总结:无论用哪种方法,都有利有弊。看实际工作需要。
举一反三,感谢支持。
标签: #for循环嵌套举例