マクロ実行の結果が違ってしまいます。

エクセルのマクロについて対処方法を教えてください。Application.OnKey "{RETURN}", "EnterKeyPaste"
あるマクロ記述の中に上記のような行があります。Enterキーが二つあるキーボードを使用しているのですが、一つのEnterキーともう一つ別のEnterキーを押した場合でマクロ実行の結果が違ってしまいます。もう一つ別のEnterキーの名前があるのであれば、その名前を教えてください。

No.1 ベストアンサー 回答者： avanzato 回答日時： 2009/12/25 13:34

こんにちは。

今記述のあるRETURNは大きなキーかと思います。
テンキー付近にある小さいのはENTERです。
Application.OnKey "{RETURN}", "EnterKeyPaste"
Application.OnKey "{ENTER}", "EnterKeyPaste"
とすれば同じになります。

この回答への補足

お忙しいところ丁寧なご回答をありがとうございます。勝手ながら重ねてお願いいたしたいのですが、実際のマクロは次のとおりです。ご回答の記述をどのように組み込めばよいかもぜひ教えてください。よろしくお願いします。
Sub Auto_Open()
Application.OnKey "{RETURN}", "EnterKeyPaste"

End Sub

Sub EnterKeyPaste()
If Application.CutCopyMode <> 0 Then
MsgBox "CTRL+Vを使用してください"
End If
ActiveCell.Offset(0, 0).Activate
End Sub

補足日時：2009/12/25 15:06

この回答へのお礼

ありがとうございました。うまくできました。

お礼日時：2009/12/25 16:00

No.4 回答者： KenKen_SP 回答日時： 2009/12/26 22:27

http://oshiete1.goo.ne.jp/qa5542641.html

でポイントになりそうなとこは（今回質問している点を含め）
カバーするつもりで書いたのですが。

ThisWorkbook モジュールがわからなかった？

No.3 回答者： avanzato 回答日時： 2009/12/25 16:08

#1です。

Sub Auto_Open()
　　Application.OnKey "{RETURN}", "EnterKeyPaste"
　　Application.OnKey "{ENTER}", "EnterKeyPaste"　'←追加
End Sub
でいいです。
他は変わりません。

No.2 回答者： f272 回答日時： 2009/12/25 13:37

Enterキーの名前であれば

{ENTER}
ですね。

この回答への補足

お忙しいところ丁寧なご回答をありがとうございます。勝手ながら重ねてお願いいたしたいのですが、実際のマクロは次のとおりです。ご回答の記述をどのように組み込めばよいかもぜひ教えてください。よろしくお願いします。
Sub Auto_Open()
Application.OnKey "{RETURN}", "EnterKeyPaste"

End Sub

Sub EnterKeyPaste()
If Application.CutCopyMode <> 0 Then
MsgBox "CTRL+Vを使用してください"
End If
ActiveCell.Offset(0, 0).Activate
End Sub

補足日時：2009/12/25 15:18

この回答へのお礼

ありがとうございました。うまくできました。

お礼日時：2009/12/25 16:00