【VBAスタンダード対策】Do While ・・・ Loop ループの正しい構文と制御構造！

指定した条件が満たされている間、処理を何度も繰り返す Do While ループ。For文とは異なり、「あらかじめ回数が決まっていない処理」に最適な構文ですが、正しいキーワードの組み合わせと、無限ループを防ぐための構造を理解する必要があります。

1. 問題：Do While ループの文法と実行結果

【 問題 】 下記のコードを実行して LoopTest プロシージャを呼び出した際、メッセージボックスに表示される数値はいくつでしょうか？

Sub LoopTest()
    Dim n As Integer
    n = 1

    Do While n < 5
        n = n + 2
    Loop

    MsgBox n
End Sub

① 3
② 5
③ 7
④ 構文エラー（コンパイルエラー）が発生する

2. 正解：Do While ループの処理フローに関する正解

正解： ② 5

3. 解説：「条件を満たしている間だけ」回る構造

Do While ループを正確に読み解くには、構文の正しいペアと、変数が変化するタイミング（タイムライン）を構造的に追う必要があります。

[ 構文ルールと実行フローの構造 ]

1. ペアは必ず「Do While」と「Loop」
VBAにおいて、Do While で始めたループは、必ず Loop キーワードで閉じます。End や End Do、あるいは単に Wend（※古い型）を使うとエラーになります。

2. 処理のトレース（追跡）
・スタート時：n = 1
・1回目判定：1 < 5 は成立（True）⇒ 内部へ進む ⇒ n = 1 + 2 ＝ 3
・2回目判定：3 < 5 は成立（True）⇒ 内部へ進む ⇒ n = 3 + 2 ＝ 5
・3回目判定：5 < 5 は不成立（False！） ⇒ ループを抜ける

★ 結果として、ループを脱出した直後の n の値は 5 になっています。

ここが試験に出る！: スタンダード試験では、「Do Whileの条件式がいつ評価されるか」や「ループを抜けた瞬間の変数の正確な値」がよく問われます。また、内部でカウンタ変数（n = n + 2 など）を更新し忘れると、条件がずっと成立したままになり、マクロがフリーズする「無限ループ」を引き起こす構造上のリスクについても意識しておきましょう。

---

4. まとめ

「Do While の終わりは Loop。条件が崩れた瞬間に外へ」。この基本フローを脳内にインストールしておけば、セルを上から順番にチェックして「空欄になるまで続ける」といった実務で最もよく使うデータスキャン処理を安全かつ正確に実装できるようになります。

【VBAスタンダード対策】Select Caseによる「文字列パターンマッチング」を攻略！

Select Case は数値だけでなく、文字列の分岐にも威力を発揮します。特に「〇〇で始まる」といった、ワイルドカードを使った柔軟なパターンマッチングを行う際の、VBA特有の構文構造をマスターしましょう。

1. 問題：ワイルドカードを使った文字列判定の文法

【 問題 】 変数 buf に格納された文字列が「Excel」で始まるかどうかを判定し、メッセージボックスを表示したい。空欄 ( A ) に入る正しい記述はどれでしょうか？

Sub StringTest()
    Dim buf As String
    buf = "Excel_VBA_Standard"

    Select Case True
        Case ( A )
            MsgBox "Excel関連のデータです"
        Case Else
            MsgBox "その他のデータです"
    End Select
End Sub

① buf = "Excel*"
② buf Like "Excel*"
③ Is Like "Excel*"
④ "Excel*"

2. 正解：文字列パターン判定に関する正解

正解： ② buf Like "Excel*"

3. 解説：「Select Case True」という特殊な構文構造

`Select Case` で文字列の「部分一致」や「パターン判定」を行う場合、通常の数値判定とは異なる特殊な構造（テクニック）が使われます。

[ 文字列パターン判定の構造ルール ]

1. 通常の書き方（Case "Excel*"）は使えない
もし Select Case buf と書き、Case "Excel*" と指定した場合、VBAは「Excel*」という文字そのものと完全に一致するか（完全一致）を判定してしまいます。ワイルドカードとして機能しません。

2. 「Select Case True」の構造マジック
部分一致を行いたいときは、最初の行を Select Case True（条件が正しいものを探す）にします。そして、Caseの後ろに buf Like "Excel*" という、判定結果が True か False になる条件式を直接記述します。

3. ワイルドカードのルール
・*（アスタリスク）：0文字以上の任意の文字列（Excel* で「Excelで始まる」）
・?（クエスチョン）：任意の1文字
・#（シャープ）：任意の数字1文字（0〜9）

ここが試験に出る！: スタンダード試験では、Select Case True の構文パターンや、ワイルドカード * ? # の意味の違いが正確に理解できているかが問われます。特に不等号の時は Case Is > 10 のように Is を使いましたが、Like演算子の時は Is を使わず「変数名 Like ...」と書く構造の明確な違いを整理しておきましょう。

---

4. まとめ

「あいまい検索は Select Case True と Like のコンビで通す」。この特殊な構文構造をマスターすれば、ファイル名のルールチェックや、特定のキーワードが含まれるデータの仕分けなど、実務でよくある文字列処理を美しくコントロールできるようになります。

【VBAスタンダード対策】Select Caseによる「複数値のカンマ指定」を攻略！

Select Case では、連続した範囲（To）だけでなく、「1または5」「2または6」のように、離れた複数の値を指定することも可能です。その際の正しい記述文法と判定の仕組みを押さえましょう。

1. 問題：カンマ区切りによる複数値の判定

【 問題 】 下記のコードを実行して CheckGroup(5) を呼び出した際、メッセージボックスに表示される文字列として正しいものはどれでしょうか？

Sub Test()
    Call CheckGroup(5)
End Sub

Sub CheckGroup(num As Integer)
    Select Case num
        Case 1, 5
            MsgBox "グループA"
        Case 2, 6
            MsgBox "グループB"
        Case Else
            MsgBox "その他"
    End Select
End Sub

① 「その他」が表示される
② 「グループA」が表示される
③ 「グループB」が表示される
④ 構文エラー（コンパイルエラー）が発生する

2. 正解：複数値指定の判定に関する正解

正解： ② 「グループA」が表示される

3. 解説：カンマは「または（Or）」の構造を持つ

特定の値を複数ピックアップして条件分岐させたい場合、VBAでは非常にシンプルな記述構造が用意されています。

[ 複数値指定の構造ルール ]

1. カンマは「Or」の意味になる
Case 1, 5 と書くと、内部的には「対象の変数が 1 または 5 の場合」という Or 条件の構造になります。今回引数に渡されたのは「5」なので、見事に条件に合致し、グループAが実行されます。

2. 「To」との違いを意識する
もし Case 1 To 5 と書いた場合は「1, 2, 3, 4, 5」のすべてが対象になりますが、Case 1, 5 であれば「1」と「5」のピンポイントな2つの値だけが対象になります。

3. 「To」と「カンマ」の組み合わせも可能
応用として、Case 1 To 3, 5（1〜3、または5）のように、範囲指定と個別指定をカンマで繋ぐ高度な構造もVBAでは認められています。

ここが試験に出る！: スタンダード試験では、If文の If num = 1 Or num = 5 Then という長くなりがちなコードを、Select Case を使ってスッキリ書き直す問題が出題されます。カンマの前後で条件が「いずれかに一致（Or）」の構造になっているかを冷静に見極めましょう。

---

4. まとめ

「離れた値はカンマで繋ぐ。それはOrのメッセージ」。このシンプルな文法構造をマスターすれば、不規則に並ぶ特定データの仕分け処理も迷わずスマートに記述できます。If文のOr連打から卒業し、見やすいコードを心がけましょう。

【VBAスタンダード対策】Select Caseによる「数値範囲」の分岐構造を攻略！

複数の条件で綺麗に分岐させたいときに便利な Select Case。単一の値だけでなく、「〇〜〇の間」や「〇より大きい」といった数値の範囲を判定する際の、VBA特有の構文構造と判定の優先順位をマスターしましょう。

1. 問題：数値範囲の指定と境界値の判定

【 問題 】 下記のコードを実行して JudgeScore(10) を呼び出した際、メッセージボックスに表示される文字列として正しいものはどれでしょうか？

Sub Test()
    Call JudgeScore(10)
End Sub

Sub JudgeScore(score As Integer)
    Select Case score
        Case 1 To 5
            MsgBox "ランクC"
        Case 5 To 10
            MsgBox "ランクB"
        Case Is > 10
            MsgBox "ランクA"
        Case Else
            MsgBox "対象外"
    End Select
End Sub

① 「ランクB」が表示される
② 「ランクA」が表示される
③ 「ランクB」が表示された後、「ランクA」も表示される
④ 構文エラー（コンパイルエラー）が発生する

2. 正解：Select Case の範囲判定に関する正解

正解： ① 「ランクB」が表示される

3. 解説：「上から順に、最初に一致した場所だけ」動く構造

Select Case の範囲指定には、文法ルールと処理の流れ（フロー）に関する重要な構造的特徴が3つあります。

[ Select Case の構造ルール ]

1. 〇〜〇の範囲は「To」を使う
Case 1 To 5 のように記述します。このとき、開始値と終了値（1と5）のどちらも条件に含まれる（以下・以上）という構造になります。そのため、5 To 10 には「10」もピッタリ含まれます。

2. 不等号を使うときは「Is」が必要
「10より大きい」を表現する場合、単に Case > 10 と書くとエラーになります。必ず Is キーワードを補って Case Is > 10 と書くのがVBAの絶対ルールです。（※Isは検査対象の変数を指す身代わり構造です）

3. 最初に一致した Case だけが実行される
【超重要】 もし JudgeScore(5) を呼び出した場合、5は「1 To 5」と「5 To 10」の両方に合致してしまいますが、VBAは上から順に判定し、最初に一致した段階でSelect Case全体を脱出する構造になっています（結果はランクCになります）。

ここが試験に出る！: スタンダード試験では、不等号を使うときに Is を書き忘れていないか、また Case 1, 2, 3 のような「カンマ区切り（いずれかに一致）」と To による「範囲指定」が正しく使い分けられているかが厳しく問われます。

---

4. まとめ

「範囲はTo、不等号はIs、一致したら即脱出」。この3つの構造ルールを頭に入れておけば、複雑な多方向分岐もすっきりと読みやすいマクロに落とし込むことができます。If文の連打に頼らない、スマートな条件分岐を構築しましょう。

【VBAスタンダード対策】Exit For 脱出時の「カウンタ変数」の値を構造的に見抜く！

ループ処理を途中で強制終了する Exit For。しかし、途中で脱出した瞬間、ループの回数を数えていた「カウンタ変数」の中身がいくつになっているか、正確に把握できていますか？ 試験で狙われる変数の内部構造を解き明かします。

1. 問題：Exit For を実行した直後の変数の中身

【 問題 】 下記のコードを実行して LoopTest プロシージャを呼び出した際、メッセージボックスに表示される数値はいくつでしょうか？

Sub LoopTest()
    Dim i As Integer

    For i = 1 To 10
        If i = 5 Then
            Exit For
        End If
    Next i

    MsgBox i
End Sub

① 4
② 5
③ 6
④ 11

2. 正解：ループ脱出時の変数状態に関する正解

正解： ② 5

3. 解説：途中で抜けた時と、最後まで回った時の「違い」

Forループにおけるカウンタ変数 i の値は、「どこで処理が中断されたか」によって、その後の構造的な値が全く異なります。

[ Forループ内のタイムライン構造 ]

・i = 1, 2, 3, 4 ── 順調に処理
・i = 5 になった！
  │
  ├── If i = 5 Then が成立
  └── Exit For が実行される

★ 途中で脱出した場合（今回）
Exit For は、Next i（値を+1する処理）に到達する前に、ループの外へジャンプする構造です。そのため、変数 i は 5 のまま保持されます。

★ 比較：もし途中で抜けずに「完走」した場合
10回目（i=10）の処理が終わり、Next i を通ることで iは 11 に増えます。そこで初めて「10を超えたから終了」と判定されるため、完走時の最終値は 11 になる構造を持っています。

1. ここが試験に出る！: スタンダード試験では、「Exit Forで抜けた時はその時点の値（5）」になり、「最後まで完ソウした時は上限＋ステップ値（11）」になるという、カウンタ変数の最終的な数値の違いを確実に突いてきます。メッセージボックスがどこで実行されているかを落ち着いて読み解きましょう。
2. エンジニアの視点: Java 17などの `for (int i=1; i<=10; i++)` 内で `break;` する構造と同じですが、VBAの `Next` は「値を増やして判定に戻る」という明確なステップ構造を意識しやすいのが特徴です。実務において、ループを抜けた後に「データが見つかって途中で抜けた（i<=10）」のか、「最後まで見つからなかった（i=11）」のかを判定するスマートな理系NEO設計によく使われます。

---

4. まとめ

「Exit ForはNextを通らないから、その時の値のまま」。このループ構造の仕組みを理解しておけば、条件に合致したデータが何番目に見つかったかを正確に捉えることができます。変数の変化を頭の中でシミュレーションして、完璧なアルゴリズムを構築しましょう。