第一章 入门篇

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次。

示例：

把上表中不及格的成绩填充为红色。

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

往期精彩回顾：

我是云飞扬，职场财会人员，愿与大家分享表格制作和数据统计分析的技巧与方法，希望大家的工作更便捷，更轻松！