投稿/コメントを表示します。

私も、プログラムを載せる練習をしてみます。
の理解が正しいかどうか試させてください。
前回間違った1行おき表示のマクロです。
[code]
Sub Rensyu2 ()
Dim zeigaku
Dim i
zeigaku = Range("B1").Value / 100
For i = 4 To 9
    Range("C" & i).Value = Range("B" & i) * (1 + zeigaku)
Next i
End Sub

2016/03/20 13:49