マクロ練習問題1 メモ
Sub 練習問題1()
Dim i As Long
For i = 2 To 11
Cells(i, 4) = Cells(i, 2) / Cells(i, 3)
Next
End Sub
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
覚える
Sub 総合練習問題1()
Dim i As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
Cells(i, 3) = Cells(i, 1) * Cells(i, 2)
Next
End Sub