Excel vba刷新表格

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

Answer 2

Private Sub CommandButton1_Click()
    Unload Me
    UserForm1.Show
End Sub