マクロルーティン#3（繰り返し構文For to Next）続き

一瞬で連続したセルに入力する
［For to Next を使う］前回のLEVELUP問題

◆目標
B1からB5のセルに連番を入力する（【For to Next】を使う）

◆考え方
まずB1に１を入力するコードを書いてみる（マクロルーティン#1 参照）
B1　の　値　は　１

つまり、
B列の１行目には１
B列の i 行目には i
　　　　　　↓
★ i が１から５まで変わるとき
B i の値は i であることに気づきます。
　　　　　　↓
「 i が１の場合から５の場合まで
　Range(”B i ”).Value= i
を繰り返してね。」
　　　　　　↓　
「For　i＝1 to 5
　Range(”B” & i ).Value = i
Next」
（【For to Next】構文 → マクロルーティン#2 ）
そして i は変数で整数であることをマクロ側に教えるには
「Dim i As Long」　を最初に書く

Sub RENBAN()
Dim i As Long
For i = 1 To 5
Range("B" & i ).Value = i
Next
End Sub

以上です。
いかがでしたでしょうか？セルに文字を入力するという流れで、急に＃２からマクロの醍醐味であるループの構文をご紹介してしまいましたが、ちょっと早すぎたかな、と思っているところです。。
ですので、次回からはもっと親しみのあるコピー＆ペーストの方法についてお伝えしていこうと思っています。

もし、皆様の中で取り上げてほしい課題がございましたらリクエストにこたえていきたいと思って言いますのでコメントいただければと思います。
次回、「マクロルーティン#4」ではコピー＆ペーストの方法をご紹介いたします。