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

次のコードは、条件をを満たした際に処理を実行する条件分岐のマクロのである。
セルD12にはセルD2からD11の合計が表示されます。セルD12の値を答えなさい。

Sub Exam1()
　Dim i As Long
　　For i = 2 To 11
　　 If Cells(i , 1) = “2” Then
　　　　If Cells(i , 2) = “東京” Then  Cells (i, 4) = Cells(i, 3) * 2
　　　　End If
　 　If Cells(i , 1) = “3” Then
　　　　If Cells(i , 2) = “北海道” Then  Cells (i, 4) = Cells(i, 3) * 3
　　　　End If
　　　Next i
End Sub

正解

4260

解説

IFステートメントのAnd条件、Or条件が入り組んだコードです。
A列”2”あるいは”3”の並立で記述されたがOr条件でネスト(入れ子)で記述されている”2”かつ”東京”,”3”かつ”大阪”がAnd条件となっています。
条件がに当てはまる場合のみ処理が実行されます。

 

　　　　　前へ　　　　　　次へ