gogoLabyrinth

VBAのCase文は、いろいろな書き方があります。

Select Case節の書き方

Case 1,2,3          ' 1,2,3のいずれか

Case 1 To 5         ' 1から5までの範囲のどれか

Case 1,2, 5 To 10   ' 1,2か、5から10までの範囲のどれか

Case Is >= 10       ' 10以上

Case "a" to "z"     ' a～z

Select Case 得点
  Case Is > 90: MsgBox  "Excellent!!"
  Case Is > 70: MsgBox  "Very Good!!"
  Case Is > 60: MsgBox  "Good!!"
  Case Else:    MsgBox  "ReTry!"
End Select