Mac版Excel VBA如何通过单按键执行宏？

原问题重现 #

用户尝试的代码：

Sub SetKey()
    application.OnKey "{0}", "Press_0"
End Sub

Sub Press_0()
MsgBox "0 Pressed"
End Sub

执行SetKey宏时触发错误：

Method 'OnKey' of object '_Application' failed

注：代码中application未大写。

问题解决与兼容性说明 #

1. 即时错误的修复 #

VBA语法不区分大小写，但未大写的application可能因编辑器未正确关联内置Application对象导致识别异常。将application改为大写Application即可解决当前错误：

Sub SetKey()
    Application.OnKey "{0}", "Press_0"
End Sub

Sub Press_0()
    MsgBox "0 Pressed"
End Sub

修改后Windows端可正常运行。

2. Mac端的适配方案 #

Application.OnKey在Mac版Excel中支持受限，原因是Mac与Windows的键盘事件处理机制存在差异，可尝试以下两种方案：

• 方案一：调整按键映射语法
  Mac版Excel中，部分标准按键无需使用{}包裹，直接传入字符本身即可。针对数字键0，修改代码如下：

  Sub SetKey_Mac()
      Application.OnKey "0", "Press_0"
  End Sub
  

  该方案对普通字符键兼容性较好，但功能键、组合键等仍可能存在不兼容情况，需自行测试验证。

• 方案二：改用工作表事件替代
  如果OnKey始终无法生效，可在目标工作表的代码模块中使用事件配合输入捕获（仅在该工作表内有效）。示例框架：

  Private Sub Worksheet_Activate()
      ' 激活工作表时设置按键（尝试兼容写法）
      Application.OnKey "0", "Press_0"
  End Sub
  
  Private Sub Worksheet_Deactivate()
      ' 离开工作表时恢复默认按键行为
      Application.OnKey "0"
  End Sub
  

  注意：Mac版Excel对部分系统级按键的捕获存在限制，无法通过纯VBA完全绕过。

内容的提问来源于stack exchange，提问作者Steve