vba - 始终保持 Excel 最小化

Question

我有一个包含一些宏和用户表单的 Excel 文件。

我不希望用户在没有密码的情况下访问文件本身。他们应该只能看到用户表单并通过用户表单输入数据。

这是我目前拥有的代码。

Private Sub Workbook_Open()

Dim ws As Worksheet
     For Each ws In Worksheets
          ws.Protect "Password", UserInterfaceOnly:=True 'True allows code to change data.
     Next ws

Application.WindowState = xlMinimized
UserForm4.Show vbModeless

End Sub

每当我们需要使用其他程序或应用程序时，它会将 Excel 最小化，但当再次尝试使用 Excel 时，窗口会最大化。

是否可以始终保持 Excel 最小化？

Answer 1

您可以隐藏应用程序，而不是最小化。

Application.Visible = False
UserForm4.Show vbModeless

这样，您将只能看到用户表单，但您必须确保在离开用户表单时重置此设置。