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