[VBA] 指数関数のグラフで遊ぼう~Dim & For

VBAで繰り返しと変数を利用してみましょう。
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
image
指数関数のカーブはほぼ絶壁ですね。