vba: 运行一个commund按钮，而另一个是运行ning

Question

我有两个这样的命令按钮：

Private Sub CommandButton1_Click()
CommandButton1.BackColor = vbRed
Application.Wait (Now + TimeValue("00:00:15"))
CommandButton1.BackColor = vbYellow
End Sub
'______________________________________________
Private Sub CommandButton2_Click()
CommandButton2.BackColor = vbBlue
End Sub

我想运行命令按钮 2，而命令按钮 1 运行宁。

有没有人有什么想法？

Answer 1

试试这个...

Private Sub CommandButton1_Click()
    CommandButton1.BackColor = vbRed
    For X=1 to 15
        Application.Wait (Now + TimeValue("00:00:01"))
        DoEvents
    Next X
    CommandButton1.BackColor = vbYellow
End Sub

如果您每次可以等待 100 毫秒，而不是 1 秒，您的应用程序的响应速度会更快。

vba: 运行一个commund按钮，而另一个是运行ning

vba: run a commund button while another one is running

vba

userform