次のコードは、セルA２の値が「Excel」あるいは「VBA」の時は、セルC2に「〇」が入力され、それ以外の場合はセルC2に「非該当」が入力されるマクロである。
コード内の空欄に入る適切な語句を解答しなさい。
Sub Exam1()
If Range("A2").Value = "Excel" Or Range("A2").Value = "VBA"【 ① 】
Range("C2").Value = "〇"
【 ② 】
Range("C2").Value = "非該当"
End If
End Sub
正解
【 ① 】 then 【 ② 】 else
解説
【7章 ステートメント】
【IFステートメント】
IFステートメントは条件を設定し条件に合う場合と合わない場合で処理を変える、条件分岐のステートメントです。
設問に「セルA２に「Excel」あるいは「VBA」の時は、セルC2に「〇」が入力されそれ以外の場合は、セルC2に「非該当」が入力される」とあるので、
IFステートメントの以下の構文を使っています。
【構文】
●Ifステートメントの以下の条件が正しかった時は処理1を行ない、条件が合わないときは処理2を行う。
構文
If 条件 Then
処理1
Else
処理2
End If
【コード解説】
Sub Exam1()
If Range("A2").Value = "Excel" Or Range("A2").Value = "VBA" Then
’Ifステートメント条件分岐～あるいは～時は以下の処理①を行う。
Range("C2").Value = "〇"
’①〇を代入する。
Else
’Ifステートメントの条件と合わない時は以下の処理②を行う。
Range("C2").Value = "非該当"
’② 非該当を代入する。
End If
End Sub
