Excelマクロ 統合セルの連続コピペ

質問

Excelマクロの初心者です

現在以下のことをマクロで行おうと思ってます。
ファイルAのシートAのC11に入ってる文章を同じファイル内にあるシート2のA46:F51の統合してあるセルにコピペします。
そして次にファイルAのシートD11に入ってる文章をシート3のA46:F51の統合してあるセルにコピペします。

このような作業をファイルAのAC11まで続けたいです。

どなたか教えて頂けないでしょうか？
よろしくお願いします。

回答No.2

tsubuyuki

「検索するなり本を見るなりして調べた方が勉強になる」
と書きましたが、先の構文がどんな処理をするマクロなのか読み取れましたか？

> コピー先に文章が入らず
と言うことはどう言うことか考えましたか？

> 何が原因なのでしょうか？
普通に考えると、
・コピー元として「空白のセルを参照している」
・コピー先が「意図しないセルを設定している」
のどちらかでしょう。

回答No.1

tsubuyuki

シートは「ＡＣ１１までの分」をあらかじめ用意してあり、
各シートの「Ａ４６：Ｆ５１」はあらかじめ結合されていると思ってよろしいですか？

範囲はＣ列からＡＣ列までで、１枚目にコピー元があるとして、全２８枚ですね。
その間でＣ列を２枚目、Ｄ列を３枚目・・・ＡＣ列を２８枚目と
２７回繰り返し処理をしてやると良いですね。

Ｆｏｒ～Ｎｅｘｔ　でも良いでしょうし、Ｄｏ～Ｌｏｏｐ　でも良いでしょうし。
中身は単純に、代入だけで行けるでしょう。

つまり

Sub test()
　　For i = 1 To 27
　　　　Worksheets(i + 1).Cells(46, 1) = Worksheets(1).Cells(11, i + 2)
　　Next
End Sub

これだけでできます。

それぞれの意味は、検索するなり本を見るなりして調べた方が勉強になると思います。

お礼

ありがとうございます。
しかしこれを実行したところ、コピー先に文章が入らず何にも記入されていない状態になってしまいました。

何が原因なのでしょうか？