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
MsgBox "空白が存在します"
End Sub
正解を見る