VBA - 用户窗体按钮(宏)继续运行子

Question

我有一个子叫 sub1()通过命令 userform1.show() 激活 userform1

此 userform1 有一个名为 continue 的按钮。单击该按钮继续 - 称为 Private Sub continuebutton() 的宏被激活。

我想以这样一种方式进行编程，使其重定向到 userform1.show() 之后的行在 sub1() .

这是可以做的事情吗？

Answer 1

从理论上讲，你想要的都是可能的，如果你这样做:

在用户窗体中:

Private Sub btnContinue_Click()
    flag = True
    Debug.Print "I continue ..."
    sub1
End Sub

在一个模块中:

Public flag As Boolean

Public Sub sub1()

    If flag Then
        Debug.Print "sub 1 continues here..."
    Else
        flag = False
        UserForm1.Show
        Exit Sub
    End If

End Sub

它将完全按照预期工作，但是 以这种方式工作不是一个好习惯。 (有些人可能会因为在 VBA 中使用公共(public)变量而向你扔石头。)这里有两篇文章，它们提供了更好的想法:

https://rubberduckvba.wordpress.com/2017/10/25/userform1-show/

免责声明 - 这是我的:

http://www.vitoshacademy.com/vba-the-perfect-userform-in-vba/