データを同一シート内に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セルに転記します。
---------------------------------
との意味になります。
ダンロード
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。