如何关闭用户窗体并在 VBA 中打开另一个用户窗体答案

【问题标题】：How to close a userform and open another in VBA如何关闭用户窗体并在 VBA 中打开另一个用户窗体
【发布时间】：2018-01-01 14:08:38
【问题描述】：

我在打开工作簿时打开的工作簿“main.xlsm”中有一个用户窗体，在此用户窗体上我有一个按钮可以打开另一个工作簿“test1.xlsm”。在“test1.xlsm”工作簿中，我有一个在打开工作簿时打开的用户窗体，在此用户窗体上，我有一个按钮可以关闭并保存该工作簿。这个想法是，从“test1.xlsm”关闭用户表单后，我应该从“main.xlsm”返回用户表单，但在Workbooks("test1.xlsm").Close 行上，它会关闭所有打开的用户表单

这是“main.xlsm”中用户表单中按钮的代码：

Private Sub CommandButton1_Click()
    Workbooks.Open ("D:\test1.xlsm")
End Sub

这是“main.xlsm”中用户表单中按钮的代码：

Private Sub SaveButton1_Click()
    Workbooks("D:\test1.xlsm").Close SaveChanges:=True
End Sub

【问题讨论】：

标签： vba excel

【解决方案1】：

在excel 论坛上提出这个问题后，我得到了将每个表单的ShowModal 属性更改为ShowModal FALSE 的建议。所以我在ThisWorkbook的代码中添加了这个参数：

  UserForm1.Show vbModeless

在两种用户表单中都有效。

【讨论】：