条件分岐処理（Select Caseステートメント）

先ほどのIf～ elseif 文では複数の条件式を記述してそれぞれ処理を振り分けることができますが、条件式が多くなるとプログラムが読みにくくなってしまうため、

条件式が多くなる場合は一般的にSelect Case 文を使用します。

[書式]

Select Case 条件の対象

    Case 条件式1

        処理

    Case 条件式2

        処理

　　　    ・

・

・

    Case Else

        処理    

End Select

条件式の記述例

[例]　

Select Case Range(“A2”).Value

Case Is >= 80

Range(“B2”).Value = “○”

Case Is >= 50

Range(“B2”).Value = “△”

Case Else

Range(“B2”).Value = “×”

End Select

[サンプルC102]

Sub C102()

Sheets(“C102”).Select

Select Case Range(“A2”).Value

Case Is >= 80

Range(“B2”).Value = “○”

Case Is >= 50

Range(“B2”).Value = “△”

Case Else

Range(“B2”).Value = “×”

End Select

End Sub

Select Case Range(“A2”).Value
で、条件の対象となるものがA2セルの値、

Case Is >= 80

Range(“B2”).Value = “○“　
で、

A2セルの値が80以上の場合はB2セルに○、

Case Is >= 50

Range(“B2”).Value = “△”
で、

それ以外でA2セルの値が50以上の場合はB2セルに△、

Case Else

Range(“B2”).Value = “×”　
で

それ以外の場合はB2セルに×が表示されます。