Excel 2013 VBA禁用转义键

时间:2016-05-02 15:10:56

标签: excel vba excel-vba

巨大的道歉。几个小时都找了这个答案,找不到它。

我已经尝试了各种方法来禁用工作表中的转义键。

一切都无济于事。我已加入社区,请求帮助。

我已经尝试了

Application.EnableCancelKey = xLDisabled

我已经

Application.OnKey "{ESC}", ""

我不想在整个工作簿中关闭转义键只是我所在的工作表。

我欢迎一些帮助。

我不是一个多产的VBA作家 - 它更多的是我为工作而不是生活。

谢谢

坚果

1 个答案:

答案 0 :(得分:0)

你正在寻找这样的东西吗?

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