前月の最終セルの値を次月のE3とG3セルに入れる

よろしくお願いします。 下記の構文で実施したのですが、次月に繰越できません。 ご教示をお願いします。 Dim U As Long Worksheets("1月").Range("E3,G3").Value = 入力フォーム.繰越.Value For U = 2 To 12 Worksheets(U & "月").Range("E3,G3").Value = Worksheets(U - 1 & "月").Range("G200").End(xlUp).Value Next U