ＶＢＡでセルのコピーを繰り返したい

質問

マクロ初心者です。
Ａ７を起点として

Ａ７：ＡＦ２２をコピーして
Ａ２３：ＡＦ３８に貼り付け
次は
Ａ３９：ＡＦ５４に貼り付け
というふうに
貼り付けた後に１６列下がって貼り付けという
処理を１０４回繰り返すマクロを作りたいのです。

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

回答No.1

Yorisin · ベストアンサー

これでどうでしょうか？

Range("A7:AF22").Select
Selection.Copy
For COUNTER = 0 To 104
ActiveCell.Offset(16, 0).Select
ActiveSheet.Paste
Next

お礼

お礼が遅くなり申し訳ありませんでした。
無事解決しました。
ありがとうございました。