「Excel VBA」Select Case文に比較演算子で比較する (Is)で比較する

2022年4月27日

書式
Case Is 比較演算子
Isと比較演算子で比較しています。
Case文の後ろにIsを利用して、比較演算子で比較を行います。

使用例

Sub testFunc()
    Dim score As Integer
    score = 70
    
    Select Case score
        Case Is = 70, 80
            Debug.Print "70または80です"
            
        Case Is > 85
            Debug.Print "85より大きい"
            
        Case Else
            Debug.Print "それ以外の値"
    End Select
End Sub

実行結果
70または80です