本文教你如何使用VBA循環語句。
1）For Next語句 以指定次數來重復執行一組語句
For counter = start To end [Step step] ‘ step 缺省值為1
[statements]
[Exit For]
[statements]
Next [counter]
如1：
For Words = 10 To 1 Step -1 ‘ 建立 10 次循環
For Chars = 0 To 9 ‘ 建立 10 次循環
MyString = MyString & Chars ‘ 將數字添加到字符串中
Next Chars ‘ Increment counter
MyString = MyString & " " ‘ 添加一個空格
Next Words
2）For Each…Next語句 主要功能是對一個數組或集合對象進行，讓所有元素重復執行一次語句
For Each element In group
Statements
[Exit for]
Statements
Next [element]
如1：
For Each rang2 In range1
With range2.interior
.colorindex=6
.pattern=xlSolid
End with
Next
這上面一例中用到了 With…End With 語句，目的是省去對象多次調用，加快速度；語法為：
With object
[statements]
End With
3）Do…loop語句 在條件為true時，重復執行區塊命令
Do {while |until} condition’ while 為當型循環，until為直到型循環，顧名思義，不多說啦
Statements
Exit do
Statements
Loop
或者使用下面語法
Do ‘ 先do 再判斷，即不論如何先干一次再說
Statements
Exit do
Statements
Loop {while |until} condition
