Excel Vba：在任意键击/按下时运行宏

Question

我正在使用以下vba代码在enter键按下事件上运行宏。但是有没有办法可以改变这个代码，以便在任何按键上运行而不仅仅是输入？

这是我正在使用的代码：

Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 13 Then
MsgBox "You Pressed a key"
End If
End Sub

提前致谢

Answer 1

由于KeyAscii始终为positive，请尝试：

Private Sub TextBox2_KeyPress(KeyAscii As Integer)
    If KeyAscii > -1 Then
        MsgBox "You Pressed a key"
    End If
End Sub

另外，我刚刚检查过，您必须删除As MSForms.Returninteger部分。我发布的代码对我来说非常合适。