See Also Example
Repeats a group of instructions a specified number of times.
For counter = start To end [ Step increment ]
Next [counter [, counter][, ...]]
The For...Next statement has these parts:
For Begins a For...Next loop control structure. Must appear before any other part of the structure.
counter Numeric variable used as the loop counter. The variable cannot be an array element or a record element.
start Initial value of counter.
To Separates start and end values.
end Final value of counter.
Step Indicates that increment is explicitly stated.
increment Amount counter is changed each time through the loop. If you do not specify Step, increment defaults to one.
statementblock Program lines between For and Next that are executed the specified number of times.
Exit For Only used within a For...Next control structure to provide an alternate way to exit. Any number of Exit For statements may be placed anywhere in the For...Next loop. Often used with the evaluation of some condition (for example, If...Then), Exit For transfers control to the statement immediately following the Next
Next Ends a For...Next loop. Causes increment to be added to counter.
The Step value controls loop execution as follows:
When step is Loop executes if
Positive or 0 counter <= end
Negative counter >= end
Once the loop has been entered and all the statements in the loop have executed, Step is added to counter. At this point, either the statements in the loop execute again (based on the same test that caused the loop to execute in the first place), or the loop is exited and execution continues with the statement following the Next statement.
Tip Changing the value of counter while inside a loop can make the program more difficult to read and debug.
You can nest For...Next loops by placing one For...Next loop within another. Give each loop a unique variable name as its counter. The following construction is correct:
For I = 1 To 10
For J = 1 To 10
For K = 1 To 10
A Next statement with the form Next K, J, I is equivalent to the following sequence of statements:
Note If you omit the variable in a Next statement, the value of Step increment is added to the variable associated with the most recent For statement. If a Next statement is encountered before its corresponding For statement, an error occurs.
For...Next Statement Example
The example puts five lines of the uppercase alphabet into a message box using two nested loops. To try this example, paste the code into the Declarations section of a form. Then press F5 and click the form.
Sub Form_Click ()
Dim I, Msg, NL, Rep ' Declare variables.
NL = Chr(13) & Chr(10) ' Define newline.
For Rep = 5 To 1 Step -1 ' Set up five repetitions.
For I = Asc("A") To Asc("Z") ' Convert alpha to numbers.
Msg = Msg & Chr(I) ' Append each letter to string.
Msg = Msg & NL ' Add newline for each rep.
MsgBox Msg ' Display message box.