Select Case文

このレッスンでは、複数の値によって処理を分けるSelect Case文の書き方を学びます。「VBA Select Case 使い方」で調べている方向けです。

Select Case 変数 Case 値1 ... Case 値2 ... Case Else ... End Selectという形で、1つの値に対して複数の分岐を書けます。他の言語のswitch文に相当します。

サンプルコードでは、曜日を表す数値によって、メッセージを出し分けています。Case Elseは「それ以外すべて」を表すデフォルトの分岐です。

初心者がよくつまずくのが、If/ElseIfをたくさん重ねてしまい、コードが読みにくくなることです。1つの変数の値によって多くの分岐がある場合は、Select Case文を使うとすっきり書けます。

実際の開発現場では、部門コードやステータスコードのような、決まった値の種類ごとに処理を分けたいときにSelect Case文が使われます。

📖 お手本コード

Sub CheckDay()
    Dim day As Integer
    day = 3
    Select Case day
        Case 1
            MsgBox "月曜日"
        Case 2
            MsgBox "火曜日"
        Case 3
            MsgBox "水曜日"
        Case Else
            MsgBox "他の曜日"
    End Select
End Sub

✍️ あなたのコード

コードを書いたら「実行する」を押してください

🧪 このサイトではVBA(Excelマクロ)を直接コンパイル・実行できないため、お手本コードと同じ内容を入力できたかをその場で判定します(採点はブラウザ内だけで行われ、どこにも送信されません)。

🎯

ここまでできればゴール達成!
曜日ごとに違うメッセージを表示するマクロが作れるようになります。