Excel スタンダード 問題 7 – 16

次の図の状態で、A列の漢字にふりがなが設定されていない場合、該当の漢字を表示するマクロを作成したい。このとき、【 1 】【 2 】に入る適切な内容を答えなさい。

Sub Test1()

    Dim i As Long

    i = 1

    Do While Cells(i, 1) <> ""

        If Cells(i, 1).【 1 】.【 2 】= Cells(i, 1) Then

            MsgBox Cells(i, 1)

        End If

        i = i + 1

    Loop

End Sub

正解を見る