如何显示UserForm时仅隐藏活动工作簿，避免其他Excel文件被隐藏？

问题根源 #

你当前的代码仅设置了Application.Visible = True，没有针对当前活动工作簿单独配置隐藏状态，反而可能因UserForm的显示逻辑，导致整个Excel应用的可见性被间接影响，最终所有工作簿都被隐藏。

正确实现代码 #

Sub Abrir_Templates_BackOffice()
    ' 仅隐藏当前活动工作簿的窗口
    ActiveWindow.Visible = False
    ' 显示UserForm，默认模态（如需操作其他工作簿，改用Show vbModeless）
    TemplatesBackOffice.Show
End Sub

关键细节说明 #

• ActiveWindow.Visible = False：这是核心区别于Application.Visible的用法——前者只控制单个工作簿窗口的可见性，不会影响其他已打开或新打开的工作簿；后者会控制整个Excel应用程序的显示状态，这也是你之前所有工作簿被隐藏的原因。
• UserForm显示模式选择：
  • 用默认的Show（模态）：UserForm显示期间无法操作其他工作簿，但其他工作簿仍保持可见；
  • 用Show vbModeless（非模态）：UserForm显示时可同时操作其他可见工作簿，按需选择即可。

补充：关闭UserForm时自动恢复工作簿可见性 #

如果需要在关闭UserForm时自动恢复当前工作簿的显示，可在UserForm的Terminate事件中添加代码：

Private Sub UserForm_Terminate()
    ' 恢复当前工作簿的可见状态
    ThisWorkbook.Windows(1).Visible = True
End Sub

内容的提问来源于stack exchange，提问作者André Lopes