VBA - Application.OnKey不允许重置

时间:2016-04-07 16:45:16

标签: excel vba excel-vba

问题的根源:

当我存储代码时......

Application.OnKey "~", "SomeSub"

在Worksheet的方法中,它可以工作。但是,如果我首先重置Application.OnKey,导致代码看起来像......

Application.OnKey "~"
Application.OnKey "~", "SomeSub"

它不再允许用户使用SomeSub密钥

运行Enter

情况:

我有一个以用户登录开头的程序。在输入用户名后,用户不必单击按钮,我想重置Enter键的含义,只需运行“SignIn”Sub。与下一张相同:在输入所需信息后,我希望Enter键运行 next Sub。因此,我重新分配Enter键的含义。问题在于,在我明确了时间的意义之后,设定......

Application.OnKey "~", "SomeSub"

不再有效。

我做错了什么?

编辑:我已经通过使用Worksheet_Change事件解决了我的问题。但是,我仍然很好奇为什么Application.OnKey似乎只能工作一次

1 个答案:

答案 0 :(得分:0)

转到“登录”-Button的属性,并将属性默认设置为true。

如果您现在使用Enter,则会触发button_click事件。

或在表单initialize event

中使用此代码
CommandButton1.Default = True