【发布时间】:2016-11-18 23:41:31
【问题描述】:
有没有办法最小化工作簿/工作表但能够保持表单打开? 我已经尝试了代码:
application.visible=false
和
userform1.show vbmodeless
但这隐藏了所有活动的工作簿,工具栏功能区也消失了。有没有办法最小化工作簿但同时保持功能区显示和表单打开?
【问题讨论】:
有没有办法最小化工作簿/工作表但能够保持表单打开? 我已经尝试了代码:
application.visible=false
和
userform1.show vbmodeless
但这隐藏了所有活动的工作簿,工具栏功能区也消失了。有没有办法最小化工作簿但同时保持功能区显示和表单打开?
【问题讨论】:
在 Excel 2010 上测试
Sub Test()
ActiveWindow.WindowState = xlMinimized
UserForm1.Show
End Sub
这将最小化 Excel 中的所有工作簿,但会保持功能区和任何用户窗体可见,如果您没有 Application.ScreenUpdating = False,那么人们将能够在 Excel 的左下方看到工作簿。
如果您只想最小化单个工作簿,可以使用下面的代码
Credit to this answer on SO for the minimizing specific workbooks
Sub test()
Dim wbName As Window
Set wbName = ActiveWorkbook.Windows(1)'You can use Windows("[Workbook Name]") as well
wbName.Visible = False
wbName.Visible = True
End Sub
如果您需要任何澄清,请告诉我
【讨论】:
Activeworkbook.Windows(),我玩得更多了,发现您不会使用.Visible= True再次使工作簿可见