データをコピーするマクロを教えてください

質問

過去に同じような質問と回答があり（QNo.322746）その通りにコーディングしてみましたが、うまく出来ません。どこが違うのか教えてください。よろしくお願いします。
下記テストデータ（Sheet1）のＢの６月分のデータ（ｂ３～ｂ６）が毎月変わるので、（Ｓheet2）に、入力後その月分のデータを年次表へコピーしたいのです。
【過去の質問】
excelで同一ブック内にあるSheet（１）の数値をSheet（２）へ値のみコピーしたいのですが。
(1)Sheet（１）で月報を作成
(2)Sheet（２）の年表へ値のみコピー（転写）。
但し、条件として○○月分とsheet（１）で表示しているものを参照し、Sheet（２）年表の○○月分のセル（○○：○○）にその値を転写したいと思っています。
当方、マクロ等よく分かりませんのでよろしくご教示下さい。
【回答】
テストデータ（Sheet1)ABは行・１～６は列
A B
1 月次表 5月分
2 項目名 　　　計数
3 売上高 　　　1230
4 受手数料 35
5 人員数 　　　　37
6 人件費 　　　　15
（以下略）
テストデータ（Sheet2)
Sheet２のデータ部分は空白にして、実行して下さい。
年次表
A B C D
1 ４月分 ５月分 ６月分 ７月分　（以下略）
2 項目名 計数 計数 計数 計数
3 売上高 1230 1520
4 受手数料 35 45
5 人員数 37 38
6 人件費 15 16
（以下略）
上記は実行結果です。５月、６月でやって見ました。
シートからALTキーを押しながら、ゆっくりF11、I、Mを
押しModele1を挿入。
（コーディング）
Sub test01()
For i = 2 To 14
If Worksheets("sheet2").Cells(2, i) = Worksheets("sheet1").Cells(1, 3) Then　'前行にくっ付ける
For j = 3 To 20
Worksheets("sheet2").Cells(j + 1, i) = Worksheets("sheet1").Cells(j, 2) '前行にくっ付ける
Next j
Exit　For
End If
Next i
End　Sub
ｉの１４は１２か月プラス上、下期小計の２列
ｊの２０は項目の最下行の行番号を仮に２０とした。

回答No.1

n-jun

＞過去に同じような質問と回答があり（QNo.322746）
リンクを貼りましょう。
http://okwave.jp/qa322746.html

で過去の質問と回答を提示して、ご本人の疑問にそのまま当てはまるのでしょうか？

お礼

n-jun様へ
御礼が遅くなりました、
指示通り、数値を少しかえてコーディングしたら無事解決できました。
ありがとうございました。