最近,我们已将Excel升级到2016。早期版本中没有该问题。
我正在使用一个隐藏的Excel应用程序(显示为唯一的用户窗体),并且在该应用程序中,我正在使用单独的工作簿加载数据。关闭数据加载器工作簿后,主应用程序变为可见。重新创建此行为的代码:
Sub Test()
Dim currentWorkbook As Workbook
Dim newWorkbook As Workbook
Set currentWorkbook = ThisWorkbook
currentWorkbook.Application.Visible = False
Set newWorkbook = currentWorkbook.Application.Workbooks.Add 'Same with Workbooks.Open
newWorkbook.Close savechanges:=False
End Sub
运行此代码后,当前工作簿窗口变为可见。在使用“即时”窗口使整个应用程序可见之后,将出现一个新的空白(灰色)Excel屏幕。在测试代码时,我运行了大约20次,当强行取消隐藏整个应用程序时,显示了许多空白的Excel窗口。
我担心,如果我每次关闭工作簿时都运行Application.Hide,资源管理器将阻塞所有空白Excel窗口,并可能导致性能问题。
问题:在同一应用程序中关闭工作簿并隐藏我的原始工作簿时,如何避免剩余Excel空白窗口?
谢谢。