Excel スタンダード 問題 9 – 11
次の図のように、A列の文字列に半角がある場合、該当するセルの文字色を赤色に変更したい。このとき、【 1 】【 2 】に入る適切な内容を答えなさい。
Sub Test()
Dim i As Long
i = 1
Do While Cells(i, 1) <> ""
If Cells(i, 1) =【 1 】(Cells(i, 1),【 2 】) Then
Cells(i, 1).Font.ColorIndex = 3
End If
i = i + 1
Loop
End Sub
正解を見る