Excel VBA質問箱 IV

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

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


16430 / 76732 ←次へ | 前へ→

【65770】Re:全てのシートでイベントのマクロを実行させたい
質問  みるく  - 10/6/26(土) 18:59 -

引用なし
パスワード
   超初心者さんへ

ご回答、ありがとうございます。
超初心者さん、ループでくくる方法は思いつきませんでした。
ただ、現状ではどのような式になるのか、分からず仕舞です。
いまあるマクロにどのように組み込めばよいか、
ご教示いただければ幸いです。

neptune さんへ

ご回答、ありがとうございます。

On Error Resume Nextは、
H:J列を開いていない状態で終了すると、
H:J列を綴じる必要が無いため、エラーメッセージがでてしまうので、
それを回避するために入れています。
万が一の予期せぬのエラーのためを考えると、
On Error GoTo 0をいれたほうが良いということでしょうか・・。

それから、おっしゃるとおり、
active sheetで限っているので、
うまくいかないことはわかっているのですが、
もともと、シートが一枚のときに組んだマクロを利用していることもあり、
そのようなコードになってしまっています。
それが、必要に応じてシートを増やすことになって、
また、シート名も内容によって後から設定していくので、
あらかじめシート名を設定できません。

For Each Ws In ThisWorkbook
というコードをネットでみつけて、トライしてみましたが、
うまくいきませんでした。

ループでくくる方法はまだ勉強不足でよく分かっていませんが、
そのような方法がべストでしょうか。
0 hits

【65745】全てのシートでイベントのマクロを実行させたい みるく 10/6/24(木) 21:58 質問
【65746】Re:全てのシートでイベントのマクロを実行... 超初心者 10/6/24(木) 22:26 発言
【65747】Re:全てのシートでイベントのマクロを実行... neptune 10/6/24(木) 22:50 回答
【65770】Re:全てのシートでイベントのマクロを実行... みるく 10/6/26(土) 18:59 質問
【65776】Re:全てのシートでイベントのマクロを実行... REV 10/6/27(日) 9:39 発言
【65780】Re:全てのシートでイベントのマクロを実行... みるく 10/6/27(日) 18:23 質問
【65781】Re:全てのシートでイベントのマクロを実行... 通り魔 10/6/27(日) 18:42 発言
【65807】Re:全てのシートでイベントのマクロを実行... みるく 10/6/29(火) 1:57 お礼

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