Excel VBA:ループ手順が説明されました。

Excel VBAループ

ループはVBAで最も基本的で強力なプログラミングツールの1つであり、ほとんどのプログラミング言語で使用されています。 ループは、特定の条件が満たされるか特定のポイント(または値)に達するまで必要な回数だけコードブロックを繰り返すために使用され、その後コードの次のセクションが実行されます。 ループを使用すると、単純な数行のコードを記述して、繰り返しだけではるかに重要な出力を実現できます。
  • ループ用
    • 次のステートメント
    • それぞれについて...次の文
  • ループ中に実行
    • 繰り返し中...ループ文
    • 実行している間...ステートメント
  • ループまで実行
    • ループステートメントまで
    • ステートメントまでループする

VBAループには3つの基本的な種類があります(以下のように6つのループに分割されています)。

ループ用

次のステートメント

コードブロックを特定の回数だけ繰り返します。

次の例では、MsgBoxを5回表示して番号を表示します。

 Sub F_Next_loop()i = 1〜5 MsgBoxの場合は整数としてi i i i i 

それぞれについて...次の文

For Each ... Nextループは、グループ内の各オブジェクトについてコードブロックを繰り返します。 コレクションの各要素に対して、コードブロックの実行を繰り返します。 コレクション内のすべての要素がカバーされるとループは終了し、Nextステートメントの直後のコードセクションに実行が移ります。

 Sub F_each_loop()ActiveSheet.Range( "A1:A10")の各セルの範囲としてセルを暗くするCell.Interior.Color = RGB(160、251、142)次へセルの末尾 

 Exit Forステートメントは、既存のループの実行を直ちに停止し、Nextステートメントの直後のコードセクションを実行します。 

ループ中に実行

指定された条件が満たされ、Trueと評価され続けている間、コードブロックを無期限に繰り返し、条件がFalseになると停止します。 条件はループの開始時または終了時にテストできます。

繰り返し中...ループ文

開始時に条件をテストします。

 Sub do_While()整数i = 1として行いますが、セル(i、1)の間に行います。値 "" MsgBox ii = i + 1ループMsgBox i End Sub 

実行している間...ステートメント

ループの終わりで条件をテストする

 Sub do_While()整数iとしてi = 1 Dim iセルB(i、1)中にMsgBox ii = i + 1を実行します。値 "" MsgBox i End Sub 

 Exit Doステートメントは、既存のループの実行を即座に停止し、Nextステートメントの直後のコードセクションを実行します。 

ループまで実行

条件が満たされてTrueと評価されるまで、コードブロックを無期限に繰り返します。 ループの開始時または終了時に条件をテストできます

ループステートメントまで

開始時に条件をテストします。

 Sub do_Until()整数i = 1がIsEmptyにならないように小さくする(Cells(i、1))Cells(i、1).Interior.Color = RGB(255、0、0)i = i + 1ループ終了Sub 

ステートメントまでループする

ループの終わりで条件をテストします。

 Sub do_Until()整数iとしてi i = 1 Cells(i、1)を実行する。Interior.Color= RGB(255、0、0)i = i + 1 IsEmptyにならないまでのループ(Cells(i、1))End Sub 
前の記事 次の記事

トップのヒント