excel - 如何刷新表单？

Question

我有一个带有按钮的用户表单。我希望按钮“刷新”表单，换句话说，我希望表单结束，然后重新打开。

下面的代码将不起作用，因为表单/宏已经结束，但我希望按钮执行此任务或类似任务。

sub command1.click()
end
userform1.show
end sub

我已经检查并尝试了大多数或所有可以选择的用户表单“刷新”选项。这可能吗？

Answer 1

这是一个非常简单的方法。只需使用 UserForm_Initialize

重新初始化用户表单

Private Sub UserForm_Initialize()
    TextBox1.Text = "" '<~~ Just an Example

    '
    '~~> Put here the code to re-initialize the userform which will refresh it
    '
End Sub

Private Sub CommandButton1_Click()
    TextBox1.Text = "Sid"

    MsgBox "Re-Initialzing the Userform"

    UserForm_Initialize
End Sub