Excel VBA Auto_Openについて質問です。

Excel VBA Auto_Openについて質問です。

A.xls
Sub Auto_Open()
Application.OnKey "{RETURN}", "ENTER_Key"
Application.OnKey "{ENTER}", "ENTER_Key"
End Sub
でENTERキーでセルを任意の場所に動かしたいと考えています。
ENTER_Key()でうまく動かす事は出来たのですが、Auto_Openが止まらず、Excelを落とさずに、違うファイル(B.xls)を開いてA.xlsをクローズしてもB.xlsでENTERを押すと、エラー1004となってしまいます。

個人的にはAuto_Openが動いてしまっている感じがします。
エラーがでるので同コードをWorkbook_open()に移したのですが、今度は「マクロが使用できないか、無効になっている・・・」の画面になります。

原因や対策、またはENTERキーでセルを任意の場所に動かす方法等のアドバイスよろしくお願いします。

ちなみに、セル動きは1回目は1行下がり、2回目は右に4つ移動です。
このルーチンは出来ていると思います。

それではよろしくお願いいたします。
m(_ _)m

No.1 ベストアンサー 回答者： hana-hana3 回答日時： 2010/01/11 21:26

＞個人的にはAuto_Openが動いてしまっている感じがします。

エクセルを終了しない限りキー定義が有効になっているのです。
そして、マクロが書かれたブックを閉じてしまうと、実行するマクロが無くなってしまうためにエラーになるのです。

ですから、マクロをどこに書いても同様です。
Ａブックを閉じても機能させたいなら個人用ブックとかアドインにすればエラーになりません。
Ａブックを閉じると機能しないようにするなら、ブックを閉じる際にキー定義を元に戻せばエラーになることはありません。