●確認テスト1

【問題文】

セルB1の値を基準にセルC1に次の条件で入力しなさい。
• セルB1が"田中"の時、セルC1に"合格"と入力

【解答例1】

Sub Test_SelectCase1_1()
    Select Case Cells(1, 2)
        Case Is = "田中"
            Cells(1, 3) = "合格"
    End Select
End Sub

【解答例2】

Sub Test_SelectCase1_2()
    Select Case Cells(1, 2)
        Case "田中"
            Cells(1, 3) = "合格"
    End Select
End Sub

【解説】

Select Case文の基本です。
解答例2では、[Is =]を省略しています。
間違えてしまった方は復習をしましょう。