Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


8629 / 76732 ←次へ | 前へ→

【73673】Re:マクロを削除するマクロ
発言  UO3  - 13/2/1(金) 10:07 -

引用なし
パスワード
   ▼ブーチー さん:

とりあえずよかったです。


>出来ればオリジナルのBOOKからマクロのコードが削除できれば、良いなあと思っています。

これについては、すでにコメントしましたように、コードのアップは差し控えます。
もちろん、できますので、あくまで自助努力で。

>1.データをグループ化していたが、解除されてしまう。
>2.0(ゼロ)表示をしないという設定が解除されてしまう。
>などなど設定が引き継がれたいない。

これについてはなるほどなぁと。ただし、これをアップした方式で継承するとすれば
ピンポイントで、ある設定に固定して継承するのは、できなくはありませんが
どういう設定がなされているのか、エクセルとして設定できるものは膨大ですから
コードで汎用的に対処するのは、ほぼ不可能でしょうね。
たとえば、シートに保護がかかっていた、それがはずれてしまう 等々。
ピンポイントで、たとえば 0表示設定 などを継承したいのであれば、新規ブック側に
その設定をマクロ内で行ったうえで保存。設定のコードについては、その操作を
マクロ記録すれば生成されますので、それを組み込んでください。

>
><更なる要望>(要求ばかりですみません)
>シート名が引き継がれていないので、コピー元と同じシート名になるようにしてほしいです。

sh.Cells.Copy toWB.Worksheets(x).Range("A1")

この下に

toWB.Worksheets(x).Name = sh.Name

これを追加してください。

いずれにしましても、今後のためにも、これはichinoseさんからアドバイスがありましたが
シートモジュールにはコードをおかず、ThisWorkbookモジュールで対処されるのが
よろしいと思います。
そうしておけば、シートそのものをコピーすれば、シートの設定はすべてそのまま
引き継がれることになりますので。

293 hits

【73649】マクロを削除するマクロ ブーチー 13/1/29(火) 16:24 質問
【73654】Re:マクロを削除するマクロ UO3 13/1/29(火) 20:49 発言
【73657】Re:マクロを削除するマクロ ブーチー 13/1/31(木) 8:15 お礼
【73659】Re:マクロを削除するマクロ UO3 13/1/31(木) 9:31 発言
【73660】Re:マクロを削除するマクロ ブーチー 13/1/31(木) 9:42 お礼
【73661】Re:マクロを削除するマクロ UO3 13/1/31(木) 11:16 発言
【73662】Re:マクロを削除するマクロ ブーチー 13/1/31(木) 11:22 発言
【73663】Re:マクロを削除するマクロ UO3 13/1/31(木) 11:32 発言
【73664】Re:マクロを削除するマクロ ブーチー 13/1/31(木) 12:08 発言
【73665】Re:マクロを削除するマクロ UO3 13/1/31(木) 19:02 発言
【73672】Re:マクロを削除するマクロ ブーチー 13/2/1(金) 9:34 発言
【73673】Re:マクロを削除するマクロ UO3 13/2/1(金) 10:07 発言
【73674】Re:マクロを削除するマクロ UO3 13/2/1(金) 10:41 発言
【73675】Re:マクロを削除するマクロ ブーチー 13/2/1(金) 10:58 お礼
【73676】Re:マクロを削除するマクロ UO3 13/2/1(金) 11:31 発言
【73655】Re:マクロを削除するマクロ ichinose 13/1/29(火) 21:08 発言
【73658】Re:マクロを削除するマクロ ブーチー 13/1/31(木) 8:23 お礼
【73682】Re:マクロを削除するマクロ ichinose 13/2/2(土) 9:24 発言
【73695】Re:マクロを削除するマクロ ブーチー 13/2/3(日) 8:14 お礼

8629 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free