シートをコピーして、名前を付けて、任意の場所に差し込む 前回同様にシートをコピーしますが、コピーすると同時にシートに名前を付けます。 シート名が重複した際は、エラー対応で識別番号を入力するようにしています。 ※本当は、(2)(3)と自動で付けたかっ…

シートをコピーして、任意の場所に差し込む シートをボタンひとつでコピーしたい。 そんなときにはこちらを。 原本をコピーして、一番左端に挿入する Sub 左端にコピー() Sheets("原本").Copy before:=Sheets(1) End Sub 原本をコピーして、一番右端に挿入す…