Question

我想知道是否有办法加快点击CommandButtons的时间？

在我使用UserForm的情况下，我点击＆＃34; next＆＃34;按钮多次，但按钮没有像我点击那样快速反应。所以有时我点击了3次＆＃34; next＆＃34;按钮只占第二个记录而不是第四个记录。

编辑：

Private Sub CommandButton1_Click()

TextBox1 = TextBox1 + 1

End Sub

Private Sub CommandButton2_Click()

TextBox1 = TextBox1 - 1

End Sub

Private Sub UserForm_Initialize()

TextBox1.Value = 1

End Sub

Answer 1

awser学分归于Rory，他指出DblClick Event。因此，考虑到这一点，很容易更改代码以更好地工作。我们需要做的就是添加Dblclick Event并将其作为减号/加号2使用，这样它看起来比以前工作得更快。

在我的情况下，我需要添加一些数字低于零的限制，但主要想法如下：）

Private Sub CommandButton1_DblClick()

TextBox1 = TextBox1 + 2

End Sub

Private Sub CommandButton2_DblClick()

TextBox1 = TextBox1 - 2

End Sub

Excel VBA：CommandButton单击时间

1 个答案: