您可以在Excel中使用VBA step关键字来指定一个不同的增量为一个循环的计数器变量。

1.将一个命令按钮

您的工作表，并添加以下代码行：

Dim i As Integer

For i = 1 To 6 Step 2

Cells(i, 1).Value = 100

Next i

结果当您单击工作表上的命令按钮：

Positive Step

说明：对于和下一步之间的行代码将被执行三次。对于i = 1时，Excel VBA输入值100到第1行和第1列的交集的单元当Excel VBA到达下一个I，它增加i相2和跳回For语句。对于i = 3时，Excel VBA输入值100成3行和列1等的交叉点处的细胞

2.将一个命令按钮

您的工作表，并添加以下代码行：

Dim j As Integer

For j = 8 To 3 Step -1

Cells(6, j).Value = 50

Next j

结果当您单击工作表上的命令按钮：

Negative Step

说明：对于和下一步之间的行代码将被执行六次。对于j = 8时，Excel VBA输入值50成6行和列8的相交处的单元当Excel VBA达到接下来j时，会减少与Ĵ1和跳回For语句。对于j = 7时，Excel VBA输入值50到细胞在6行和第7列等的交点