|
▼ブーチー さん:
とりあえずよかったです。
>出来ればオリジナルのBOOKからマクロのコードが削除できれば、良いなあと思っています。
これについては、すでにコメントしましたように、コードのアップは差し控えます。
もちろん、できますので、あくまで自助努力で。
>1.データをグループ化していたが、解除されてしまう。
>2.0(ゼロ)表示をしないという設定が解除されてしまう。
>などなど設定が引き継がれたいない。
これについてはなるほどなぁと。ただし、これをアップした方式で継承するとすれば
ピンポイントで、ある設定に固定して継承するのは、できなくはありませんが
どういう設定がなされているのか、エクセルとして設定できるものは膨大ですから
コードで汎用的に対処するのは、ほぼ不可能でしょうね。
たとえば、シートに保護がかかっていた、それがはずれてしまう 等々。
ピンポイントで、たとえば 0表示設定 などを継承したいのであれば、新規ブック側に
その設定をマクロ内で行ったうえで保存。設定のコードについては、その操作を
マクロ記録すれば生成されますので、それを組み込んでください。
>
><更なる要望>(要求ばかりですみません)
>シート名が引き継がれていないので、コピー元と同じシート名になるようにしてほしいです。
sh.Cells.Copy toWB.Worksheets(x).Range("A1")
この下に
toWB.Worksheets(x).Name = sh.Name
これを追加してください。
いずれにしましても、今後のためにも、これはichinoseさんからアドバイスがありましたが
シートモジュールにはコードをおかず、ThisWorkbookモジュールで対処されるのが
よろしいと思います。
そうしておけば、シートそのものをコピーすれば、シートの設定はすべてそのまま
引き継がれることになりますので。
|
|