VBAのイベントマクロを使ってワークシートが移動されたタイミングでマクロを起動したい

Question

こんにちは。

表題の通り、VBAのシートが移動されたタイミングでマクロを起動させたいです。

既存のイベントマクロには、そのようなイベントはないのでどのように実装すればいいか悩んでいます。

やりたいことは、
あるブック内のシートが移動されたタイミングで、シート名の名前を毎回変更させようと思っています。

Answer 1

他の回答にあるSheetTableUpdateが発生するのか確認してみましたが、シートを移動してもイベントは発生しませんでした。
環境によるのか、設定によるのか、そもそも用途が違うのかは不明です。

他にピンポイントのイベントがないか見てみましたがなさそうですね。
そこで代案ですが、Calculate系のイベントはシートを移動したタイミングで発生するようです。
もちろんシート上に何かしらの数式が必要ですが。
そこを契機に処理することは可能かと思います。

Comments

[Tetsuya3456]

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

sheetapdateの方はまだ確認できていませんが、calculateは移動したタイミングでマクロ起動できました！
不具合がないか、明日また確かめてみます。

ありがとうございます！

[Tetsuya3456]

本日、sheetTableUpdateとCalculateを試したのですが、Calculateのみシート移動時、マクロを起動することができました。
ただ、通常のモジュールで組んだマクロだとシート名変更が問題なく行えるのですが、そのマクロをCalculateに移すと、
シート名変更の確認ダイアログが求められ、フリーズしてしまいます。

ですので、今は標準モジュールで作って、手動でボタンでマクロを起動する形にしていますが、このような状態は起こりませんでしたでしょうか。

[ttyp03]

そこまで確認はしてなかったので、わかりません。
おそらくイベントの連鎖が起きているような気がするので、処理の前後でEnableEventsを設定してみてはどうでしょうか。

Application.EnableEvents = False
シート名変更処理
Application.EnableEvents = True

Answer 2

シートが移動されたら、ワークシートのテーブルが影響を受けるので、SheetTableUpdateのイベントが発生しませんか？

Comments

[Tetsuya3456]

そういうイベントがあるのですね。すいません、未把握でした。
早速調べてみます！
ありがとうございます。