【ExcelVBAベーシック】複数行ステートメント【練習問題】

ExcelVBAベーシックの試験範囲に関する練習問題を記載していきます。
勉強して得た知識が定着しているかを確認しましょう。
他の練習問題を見たい場合は練習問題一覧を押下し確認してください。

【問題】

以下のステートメントを複数行に分割し記述してください。
If ActiveSheet.Cells(1, 2) = “土” Then ActiveSheet.Range(ActiveSheet.Cells(1, 1), ActiveSheet.Cells(1, 4)).Interior.ColorIndex = 20

【解答と解説】

※問題の要件を満たしていれば正解としてください。

長いステートメントを複数行に分割するには「 (スペース)_」を使います。

[code] If ActiveSheet.Cells(1, 2) = "土" _
Then ActiveSheet.Range(ActiveSheet.Cells(1, 1), ActiveSheet.Cells(1, 4)) _
.Interior.ColorIndex = 20
[/code]

「 _」で区切る場所はどこでも良いですが、
上記のようにステートメントの区切りが良いところで分割するのが良いかと思います。

▼実際に試したのがこちら