Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

繰り返し処理（While…Wend ステートメント）

2015/03/25

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ソース例

　

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

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

　

実行結果

- 構文 While...Wend ステートメント, エクセルVBA, 構文, 繰り返し処理

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: エラー処理（On Error ステートメント / Errオブジェクト）

On Error ステートメントの使い方【構文 1】 On Error GoT …

: 繰り返し処理（For…Next ステートメント）

For…Next ステートメントの使い方【構文】 For coun …

: プロシージャを作成する（ Sub, Function ）

プロシージャを作成するプロシージャとは、実行時に 1 つの単位として処理される …

: 配列が引数のプロシージャを作成する

配列が引数のプロシージャを作成する【構文】 { Sub | Function …

: 引数の参照渡し・値渡し（ ByRef, ByVal ）

引数の「参照渡し」と「値渡し」「参照渡し」とはプロシージャに引数として変数を渡 …

: 省略可能な引数・デフォルト値を設定（ Optional キーワード）

Optional キーワード Optional キーワードを使用するとプロシージ …

: 条件分岐（Select Case ステートメント）

Select Case ステートメントの使い方【構文】 Select Case …

: 変数やプロシージャのスコープ（適用範囲）

変数やプロシージャのスコープ（適用範囲）【構文：変数の宣言】 { Dim | …

: 引数を可変にする（ ParamArray ）

ParamArray キーワード ParamArray キーワードを使用すると任 …

: プロシージャを呼び出す（Call ステートメント）

プロシージャを呼び出すプロシージャ内から、別のプロシージャを呼び出すには、Ca …

PREV: 繰り返し処理（Do...Loop ステートメント）
NEXT: 繰り返し処理（For...Next ステートメント）