While...Wend ステートメント

特定の条件が True である限り一連のステートメントを実行します。

構文

Whilecondition [ statements ] Wend

While...Wend ステートメントの構文には、次の指定項目があります。

指定項目 説明
condition 必須。 True または False に評価される数値式または文字列式です。 conditionNull の場合は、conditionFalse として処理されます。
statements 省略可能。 条件が True の間に実行される 1 つ以上のステートメントです。

解説

conditionTrue の場合は、Wend ステートメントにたどり着くまで、すべての statements が実行されます。 その後で、制御は While ステートメントに戻って、condition が再度チェックされます。 conditionTrue のままの場合は、処理が繰り返されます。 True ではない場合、プログラムの実行は Wend ステートメントの次のステートメントから再開されます。

While...Wend ループは、どのレベルまででも入れ子にできます。 それぞれの Wend は直前の While に対応します。

ヒント

Do...Loop ステートメントを使用すると、より構造化された柔軟な方法でループを実行できます。

この例では、While...Wend ステートメントを使用してカウンター変数の値を増やしています。 ループ内のステートメントは、条件が True に評価されなくなるまで実行されます。

Dim Counter 
Counter = 0 ' Initialize variable. 
While Counter < 20 ' Test value of Counter. 
 Counter = Counter + 1 ' Increment Counter. 
Wend ' End While loop when Counter > 19. 
Debug.Print Counter ' Prints 20 in the Immediate window. 

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。