Excel 2013 VBAエスケープキーを無効にする

Question

大変申し訳ありません。この回答を何時間も探していて、それを見つけることはできません。

私は、ワークシートでエスケープキーを無効にするさまざまな方法を試しました。

すべて利用できません。私はコミュニティに参加して、何か助けを求めてください。

私は

Application.EnableCancelKey = xLDisabled 

を試みたと私は、エスケープキーがブック全体で私は午前だけのワークシートをオフにしたくない

Application.OnKey "{ESC}", "" 

を使用しました。

私はいくつかの助けを歓迎するでしょう。

私は多忙なVBAライターではありません - 私は仕事のために生きているよりも多くのことをしています。

は、あなたがこのような何かを探してい

ナッティ

Answer 1

ありがとう？

Private Sub Workbook_Open() 
    If ActiveSheet.Name = "Sheet2" Then 
    Application.OnKey "{ESC}", "" 
    Else 
    Application.OnKey "{ESC}" 
    End If 
End Sub 

Private Sub Workbook_Activate() 
    If ActiveSheet.Name = "Sheet2" Then 
     Application.OnKey "{ESC}", "" 
    Else 
     Application.OnKey "{ESC}" 
    End If 
End Sub 

Private Sub Workbook_Deactivate() 
    Application.OnKey "{ESC}" 
End Sub 

Private Sub Workbook_BeforeClose(Cancel As Boolean) 
    Application.OnKey "{ESC}" 
End Sub