VBA2003: 自作メニューバーを操作したい

VBEのＶＢＡＰrojectの中の、Thisworkbookをクリックして、イベントの SheetActivateを出して Private Sub Workbook_SheetActivate(ByVal Sh As Object) If Sh.Name = "Sheet2" Then MsgBox "AAA" End If End Sub のようにして、 Ｓｈｅｅｔ２のシートタブをクリックして開くと、ＡＡＡが表示されるでしょう。他の場合は表示されないでしょう。 これを使ってそのオブジェクトをEnabled = True/False で決めれば良いのではないでしょうか。 処理を、Ｓｈｅｅｔ２とそれ以外にするには、上記のＩＦステートメントブロックでＥｌｓｅを入れて、Ｓｈｅｅｔ２以外の場合の処理を書き込む。