Excel VBA質問箱 IV

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

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


8620 / 76732 ←次へ | 前へ→

【73682】Re:マクロを削除するマクロ
発言  ichinose  - 13/2/2(土) 9:24 -

引用なし
パスワード
   おはようございます。
シートコピーを行うと、シートモジュールにあるコードも一緒にコピーはされます。
ですから、シートモジュールにあるコードは削除して、同じ機能を構成できるように
Thisworkbookのモジュールの
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

↑ここに同じ処理がされるようにVBAコードを記述しては いかがですか?
と申し上げました。このように元ブックを作成しておけば、シートコピーでVBAコードが
コピーされることがないからです。
元ブックのVBAコード構成を変えて運用しては? という提案だったのです。

UO3 さんとのやりとりで
>対象となるエクセルファイルは毎月送られてくるもので、自分で作っているのもではありません。
ということを知りました。
でしたら、送り元にこのように作り直してくれ と依頼するか、
御自分でこのように作り直して、このブックで送ってくれ と要請されては いかがですか?

>出来ればオリジナルのBOOKからマクロのコードが削除できれば
マクロコードを削除するコードは、Excel2002以降は、セキュリティを下げなければ
使用できません。ですから、そのことの危険性を十分に理解していることが大前提になります。
マクロコードを削除したり、変更したり出来るのですから、その設定で運用していたら、
元々マクロがないブックにマクロを付けてコードを実行させることが出来てしまいます。
この危険性を熟知された方が便利に使う機能だと思います。

セキュリティレベルを下げても良いなら・・・、
そもそも御質問された原因は、
>ファイルを開くたびに、マクロを有効にしますかと聞かれるので
でしたね!! セキュリティレベルを「低」に設定すれば、メッセージは出ません。
これで運用されては?

又は、元ブックの送り先にデジタル署名付で送ってもらったらいかがですか?
セキュリティレベル 「中」でも最初だけのメッセージで次回からは、確認メッセージがでません。
(デジタル署名の詳細は、ネット検索してください)。

後は、UO3 さんの提示コードでの問題点の
>1.データをグループ化していたが、解除されてしまう。
>2.0(ゼロ)表示をしないという設定が解除されてしまう


グループ化が解除されているなら、再設定するコードを考える
0表示しない設定は、オプションで設定できるので、0 表示しないという設定にする

というコードをマクロの記録等を利用して作成していくという方法を試してみては
いかがですか?

274 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 お礼

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