繰り返し処理(For…Next ステートメント)
2015/03/26
For…Next ステートメントの使い方
For counter = start To end [ Step step ]
[ statements ]
Next [ counter ]
【項目の説明】
- counter ・・・ 繰り返し処理の処理回数を保持する変数。
- start ・・・ counter の初期値。
- end ・・・ counter の終了値。
- step ・・・ 1回のループごとに、counter に加える値(省略可)。
- statements ・・・ For…Next ステートメントで指定した回数だけ実行されます(省略可)。
Step step を省略した場合、引数 counter には 1回 のループごとに「1」が加算されます。
For…Next ステートメント から抜け出す方法に、Exit For ステートメント を指定することができます。また、For…Next ステートメント はネスト (入れ子) 構造にすることができ、その場合に Exit For が実行された場合は、その Exit For を囲んでいる 1 番内側のループから抜け出します。
もし無限ループの状態に陥ってしまった場合は、[ECS] キーを押し続けるか、それで戻らない場合は、[Ctrl] + [Alt] + [Delete] を押して Windows のタスクマネージャーを表示して、Excel を強制終了してください。
For…Next ステートメントの使用例
VBAソース例
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
Sub sample_for_next() Dim counter Dim i counter = 0 For i = 0 To 20 Step 6 counter = counter + 1 If counter > 21 Then Exit For Next MsgBox counter & " 回ループしました。" End Sub |
実行結果
関連記事
-
繰り返し処理(While…Wend ステートメント)
While…Wend ステートメントの使い方 【構文】 While …
-
set ステートメントを使う
Set ステートメントを使う 【構文 1】 Dim objectvar [ As …
-
引数を可変にする( ParamArray )
ParamArray キーワード ParamArray キーワードを使用すると任 …
-
条件分岐(Select Case ステートメント)
Select Case ステートメントの使い方 【構文】 Select Case …
-
引数の参照渡し・値渡し( ByRef, ByVal )
引数の「参照渡し」と「値渡し」 「参照渡し」とはプロシージャに引数として変数を渡 …
-
繰り返し処理(For Each…Next ステートメント)
For Each…Next ステートメントの使い方 【構文】 For …
-
プロシージャを作成する( Sub, Function )
プロシージャを作成する プロシージャとは、実行時に 1 つの単位として処理される …
-
プロシージャを呼び出す(Call ステートメント)
プロシージャを呼び出す プロシージャ内から、別のプロシージャを呼び出すには、Ca …
-
エラー処理(On Error ステートメント / Errオブジェクト)
On Error ステートメントの使い方 【構文 1】 On Error GoT …
-
変数やプロシージャのスコープ(適用範囲)
変数やプロシージャのスコープ(適用範囲) 【構文:変数の宣言】 { Dim | …