前言:
如今兄弟们对“利用for循环语句编写计算n的函数程序取n分别为”大概比较着重,你们都想要分析一些“利用for循环语句编写计算n的函数程序取n分别为”的相关文章。那么小编同时在网络上网罗了一些对于“利用for循环语句编写计算n的函数程序取n分别为””的相关文章,希望各位老铁们能喜欢,看官们一起来学习一下吧!第一章 入门篇
1.8 FOR循环语句
1、FOR循环语句
for 变量名=x to y step n
"循环的内容"
Next
变量从x循环到y,步长为n,每次都执行循环的内容。
例如下面这个for语句小程序,从“a2”单元格循环到“a100”单元格,步长默认为1,如果单元格的值小于60,就把单元格的字体颜色设置为红色。
Sub for语句()
For i = 2 To 100
If Cells(i, 1) < 60 Then
Cells(i, 1).Font.Color = 255
End If
Next
End Sub
如果每三行判断一次,就可以设置步长为3(以此类推):
For i = 2 To 100 Step 3
"循环的内容"
Next
2、FOR循环嵌套
在FOR循环里再写一个FOR循环,就是FOR循环嵌套。
for i=1 to 3
for n=1 to 10
"循环的内容"
next n
next i
(next后面的n和i只是起注释提醒作用,可以不写。)
上面这个程序,外层循环3次,外层每循环一次时内层会循环10次,所以"循环的内容"一共会执行30次。
示例:
科目
姓名
语文
数学
英语
美术
体育
A同学
99
64
25
60
79
B同学
81
99
37
98
23
C同学
76
68
96
82
68
D同学
67
89
62
39
54
E同学
82
82
62
65
85
F同学
23
83
77
59
60
把上表中不及格的成绩填充为红色。
Sub for嵌套()
For i = 2 To 7
For n = 2 To 6
If Cells(i, n) < 60 Then
Cells(i, n).Interior.ColorIndex = 3
End If
Next n
Next i
End Sub
因为表头和第一列是科目和姓名,所以行和列都是从2开始循环的。
需要特别说明的是,FOR循环里的STEP可以是负数,也就是FOR循环可以倒着从下往上循环。
例如本章节的第一个for语句小程序,也可以从“a100”单元格开始往上循环到“a2”单元格,步长为-1。
Sub for语句()
For i =100 To 2 Step -1
If Cells(i, 1) < 60 Then
Cells(i, 1).Font.Color = 255
End If
Next
End Sub
往期精彩回顾:
学习VBA,报表做到飞 第一章 入门篇 1.7 IF语句
学习VBA,报表做到飞 第一章 入门篇 1.6 方法
第一章 入门篇 1.5 属性
我是云飞扬,职场财会人员,愿与大家分享表格制作和数据统计分析的技巧与方法,希望大家的工作更便捷,更轻松!