質問: エクセルの自動で複写 エクセル2019を使用しています。 a1からk17までの範囲を1ブロックと考え、l1セルに複写回数を入力し、18行目以降にブロックを回数分だけ自動で複写したいです。(終わりの行番号が17の倍数になる感じです)計算式の組み合わせでできればよいのですが、いい方法があれば教えていただけないでしょうか。 よろしくお願いいたします。
回答: とりあえず、マクロで。 sub rcopy() const rgrow as integer = 17 const rgcol as integer = 11 dim cpcnt as integer dim cpcntx as integer cpcntx = val(cells(1, 12).value) if cpcntx < 1 then end for cpcnt = 1 to cpcntx range(cells(1, 1), cells(rgrow, rgcol)).copy cells(rgrow * cpcnt + 1, 1).select activesheet.paste next end sub