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

A列の値を2倍にし、B列に代入させたい。ただし、A列の値に空白があった場合、繰り返し処理を終了させたい。このとき、【 1 】に入る適切な内容を答えなさい。

Sub Test1()

    Dim i As Long

    For i = 1 To 10

        If Cells(i, 1) = ""  Then

           【 1 】For

        End If

        Cells(i, 2) = Cells(i, 1) * 2

    Next i

End Sub

正解を見る