データを同一シート内にFor～Next文を使用して転記する方法について説明します。
【目次】
例題
例題は、＜実行＞ボタンをクリックすると、転記前状態（A2セル～A6セルに登録されているデータ）を、For～Next文を使用した転記後状態（C2セル～C6セルに転記）にするプログラミング方法です。
[転記前]：
[転記後]：
プログラミング
プログラミングは以下の通りとなります。
[記述例]：
-------------------------------------------------
Sub サンプル()
Dim 行 As Double
For 行 = 2 To 6
Range("C" & 行) = Range("A" & 行)
Next
End Sub
-------------------------------------------------
最初に変数：行を指定します。
次にFor～Next文を使用して変数：行に2～6までの数値を順次セットしながらループさせます。
このループによりA列の2行目～6行目のデータを転記する事になります。
転記の記述方法は、「＝」（イコール）の右側に転記前のセルを指定し、左側に転記先のセルを指定します。
ループ内の記述内容を説明すると、
「最初に変数：行に2がセットされている場合、A2セルのデータをC2セルに転記します。
次に変数：行に3がセットされている場合、A3セルのデータをC3セルに転記します。
次に変数：行に4がセットされている場合、A4セルのデータをC4セルに転記します。
次に変数：行に5がセットされている場合、A5セルのデータをC5セルに転記します。
次に変数：行に6がセットされている場合、A6セルのデータをC6セルに転記します。」
との意味になります。
※上記の記述例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。また、ボタンにプログラムを割り当てるにはこちらを参考にして下さい。
ダンロード
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。