繰り返し処理（While…Wend ステートメント）
While…Wend ステートメントの使い方
While condition
[ statements ]
Wend
【項目の説明】
- condition ・・・ 真 (True) または偽 (False) を評価する数式、文字列式を指定します。
- statements ・・・ 引数（ condition ）が真 (True) である間、繰り返し実行される任意の行数のステートメントを記述します（省略可）。
引数 condition の値が Null 値の場合、引数 condition は、偽 (False) であるとみなされます。
もし無限ループの状態に陥ってしまった場合は、[ECS] キーを押し続けるか、それで戻らない場合は、[Ctrl] + [Alt] + [Delete] を押して Windows のタスクマネージャーを表示して、Excel を強制終了してください。
While…Wend ステートメント は、基本的に途中でループから抜けることができません。Goto ステートメント等を使えば無理やり抜けることも可能ですが、そういった場合は、より多様な処理を行うことができる Do…Loop ステートメントを使う方がよいでしょう。
While…Wend ステートメントの使用例
VBAソース例
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
Sub sample_while_wend() Dim num Dim counter num = 1 counter = 0 While num <= 100 num = num * 2 counter = counter + 1 Wend MsgBox counter & " 回ループしました。" End Sub |
実行結果
関連記事
-
-
変数やプロシージャのスコープ（適用範囲）
変数やプロシージャのスコープ（適用範囲） 【構文：変数の宣言】 { Dim | …
-
-
条件分岐 If文（If…Then…Else ステートメント）
If…Then…Else ステートメントの使い方 【構文 …
-
-
With ステートメントを使う
With ステートメントを使う With ステートメントを使うことで、１度指定し …
-
-
エラー処理（On Error ステートメント / Errオブジェクト）
On Error ステートメントの使い方 【構文 1】 On Error GoT …
-
-
プロシージャを呼び出す（Call ステートメント）
プロシージャを呼び出す プロシージャ内から、別のプロシージャを呼び出すには、Ca …
-
-
繰り返し処理（For…Next ステートメント）
For…Next ステートメントの使い方 【構文】 For coun …
-
-
配列が引数のプロシージャを作成する
配列が引数のプロシージャを作成する 【構文】 { Sub | Function …
-
-
省略可能な引数・デフォルト値を設定（ Optional キーワード ）
Optional キーワード Optional キーワードを使用するとプロシージ …
-
-
繰り返し処理（Do…Loop ステートメント）
Do…Loop ステートメントの使い方 【構文 1】 Do [ Wh …
-
-
ユーザー定義型変数を使う（Type ステートメント）
Type ステートメントを使う Type ステートメントを使うと１つまたは複数の …