简单介绍一下for each，看一下和for有什么不一样的地方。

打开Visual Basic，添加一个新模块和过程。

如果要在当前工作表中A1到A10单元格都输入同一个数字，用for循环如下图。

使用for each循环达到如上for循环的同样效果则如图所示。

1）rng为变量，这里的意思即为单元格，相当于Range(A1)等等；

2）for each中rng变量是在A1到A10的范围内循环；

3）在定义的时候（Dim rng as Range）也是将rng定义为Range区域或范围；

4）rng=1即是给单元格赋值为1。

如果要使A1到A10的数据依次递增，在for循环中可以利用变量i，如图所示。

那么在for each中，通过上面的方法无法实现，则需要再定义一个变量i。

1）新定义一个变量i；

2）在for each循环中添加i=i+1，因i初始为整数0，所以第一次循环得到i+1，即0+1等于1；

3）执行到rng=i，即可得到rng=1，后面依次循环递增。