VBAExcelのDoUntilLoopとは何ですか?
でUNTILループVBAドゥ、我々は停止するループをしたいと終了文がループ自体であるときを意味しているまでの文の後に基準を定義する必要があります。したがって、条件がFALSEの場合、ループ内でステートメントを実行し続けますが、条件がTRUEの場合、すぐにDoUntilステートメントを終了します。
言葉自体が、基準に達するまで何らかのタスクを実行することを示しているように、ほとんどすべてのプログラミング言語でループが使用されるまで実行します。VBAでも、ループまで実行することがあります。Do until Loopは、条件がTRUEになるまで何かを行うことを意味します。これは、論理関数がTRUEまたはFALSEに基づいて機能するようなものです。
これは、条件がTRUEである限り、Dowhileがループを実行するDoWhileループの反対です。
構文
DoUntilループには2種類の構文があります。
構文#1
[条件] [タスクの実行]ループまで実行
構文#2
[条件]まで[タスクの実行]ループを実行します
どちらも非常によく似ており、1つの単純な違いがあります。
最初の構文では、「DoUntil」ループが最初に条件をチェックし、条件の結果がTRUEまたはFALSEになるようにします。条件がFALSEの場合、コードを実行して指定されたタスクを実行し、条件がTRUEの場合、ループを終了します。
2番目の構文「Do」ループでは、最初にcodタスクを実行し、次に条件がTRUEかFALSEかをテストします。条件がFALSEの場合、再び戻って同じタスクを実行します。条件がTRUEの場合、すぐにループを終了します。
例
理論の部分で何かを理解するのはそれほど簡単ではないことを私は知っていますが、心配することは何もありません。ループを理解するための簡単な例を示します。読む。学習を開始するには、セルA1からA10に最初の10個のシリアル番号を挿入するタスクを実行しましょう。
このVBADo until Excelテンプレートはここからダウンロードできます– VBA Do untilExcelテンプレート以下の手順に従って、「実行するまで」ループを適用します。
ステップ1:最初にマクロ名を作成して、サブプロシージャを開始します。
コード:
Sub Do_Until_Example1()End Sub
ステップ2:変数を「Long」として定義します。 「x」を長いデータ型として定義しました。
Dim x As Long
ステップ3:「DoUntil」という単語を入力します。
まで行う
ステップ4:ループ名を開始した後、条件を「x = 11」として入力します。
x = 11まで行う
x = 11は、適用した論理テストです。したがって、この行は、xが11に等しくなるまでループを実行することを示しています。
ステップ5: CELLSプロパティを適用し、1から10までのシリアル番号を挿入しましょう。
Cells(x、1).Value = x
注:ここで、「x」は1から始まると述べたので、最初はx値は1に等しくなります。「x」がある場合は常に1に等しくなります。
ステップ6:「LOOP」という単語を入力してループを閉じます。
Sub Do_Until_Example1()Dim x As Long Do until x = 11 Cells(x、1).Value = x Loop
エンドサブ
さて、コーディングの部分は終わりました。次に、ループをよりよく理解するために、コードを1行ずつテストします。
行ごとにコードを実行するには、最初にF8キーを押します。
最初にマクロ名が黄色で強調表示されます。
黄色い線が見える場合は、もう一度F8キーを押すと、実行しようとしていないことを示しています。
F8キーをもう一度押すと、黄色の線が[ループまで実行]に移動します。
ループを理解するために、変数「x」にカーソルを置き、変数「x」の値を確認します。
したがって、x = 0です。強調表示された行はループの最初の行であり、「x」の値はゼロなので、もう一度F8キーを押して、「x」の値を確認します。その終了の前に、コードが実行され、値が「x」に1として割り当てられます。
ここで、F8キーを押して、ループの実行を再開します。「x」の値を参照してください。
これで、「x」の値は1として表示されます。変数「x」に増分値を設定するには、ループ内で変数「x」の値をx = x +1として再割り当てする必要があります。
ここでもう一度F8キーを押すと、セルA1で値1が取得されます。
ここでもう一度F8キーを押して、「x」の値を確認します。
現在、変数「x」の値は2です。したがって、条件は、条件がTRUEになるまでループを実行するように指示しているため、「x」の値が11になるまでループが実行され続けます。
F8をもう一度押すと、「DoUntil」ループラインに戻ります。
F8キーをさらに2回押すと、セルA2に値2が表示されます。
もう一度F8キーを押すと、「x」の値が3になります。
もう一度F8キーを押すと、もう一度ループに戻ります。
このように、このループは「x」の値が11になるまでタスクを実行し続けます。これで、「x」の値が11になるまでループを実行しました。
F8キーを押すと、ループに戻ります。
しかし、ここでF8キーを押すと、適用された条件が「TRUE」、つまりx = 11になるため、ループが終了します。
そのため、Excelシートには1から10までのシリアル番号があります。
つまり、これが「DoUntil」ループの基本的な考え方です。ループを理解するには、ループに関する完全な知識が得られるまで、コードを1行ずつ実行する必要があります。