Excel VBA スタンダード 模擬問題 ② 3章-5

次のコードは、Select Caseステートメントを用いてB列の値が 750または950のときはC列に”○”を代入し、900から950の間の値の時はC列に”ー”を代入するマクロである。空欄に入る適切な語句を入力しなさい。

Sub Exam1()
　　Dim i As Long
　　For i = 2 To 11
　　　Select Case Cells(i, 2)
　　　　Case 750【　①　】850
　　　　　Cells(i, 3) = “○”
　　　　Case 900 【　②　】 950
　　　　　Cells(i, 3) = “ー”
　　　End Select
　　Next i
End Sub

正解

【　①　】,（カンマ）

【　②　】 To

解説

・Caseに続く条件に複数の条件をいずれか指定するときは、
１または10…Case 1,10　「,」カンマ前後の条件を指定する

1から10…Case 1 To 10　「To」 範囲を指定する

・その他に　Case Is とした場合Is演算子以降の値を評価します。
Case Is < 値　…値を(評価し)「値」＜…未満の場合と条件を指定する

　　　　　前へ　　　　　　次へ