A列に0~100の数を B列に2の累乗を表示します。
- 変数i(Iterator)では累乗の数をカウントします。
- 変数n(Number)を2倍にしていきます。
- 変数r(Row)は結果を書き込むセルの行番号を保持します。
Sub baibai_game
Dim i, n, r
n = 1
r = 2
range("A1") = "x"
range("B1") = "y=2^x"
For i = 0 To 100
cells(r,1) = i
cells(r,2) = n
n = n * 2
r = r + 1
Next i
End sub
指数関数のカーブはほぼ絶壁ですね。