如何导入没有窗口屏幕更新的工作表？

我需要从另一本书如何导入没有窗口屏幕更新的工作表？

Application.ScreenUpdating = False 
Workbooks.Open fileName:=ThisWorkbook.path & "\temp01.xlsx" 
Workbooks("temp01.xlsx").Sheets.Copy before:=ThisWorkbook.Sheets("adm") 
Workbooks("temp01.xlsx").Close False 
Application.ScreenUpdating = True

但在Windows任务栏是可见的，这本书SI打开，几秒钟后进口片 - 封闭。
有没有办法在不打开目标书的情况下导入工作表，或者在没有获得任务栏更新的情况下打开工作表？

来源

2012-09-04 Alegro

您可以将此行添加到代码的开头。

Application.Visible = False

，并且该列表来结束你的代码

Application.Visible = True

，而你的代码运行时它会隐藏任务栏上的Excel应用程序的。

来源

2012-09-04 09:34:10

罗伯特，在这种情况下，整个Excel窗口变得隐藏并再次可见。而且，加赢任务栏也会发生变化。我需要静静地导入一张纸，而不会在屏幕上闪烁任何东西。 – Alegro

看看这个答案。 http://stackoverflow.com/questions/5680061/how-can-i-stop-excel-workbook-flicker-on-automation-open –

Au！让我们说 - 解决:)。感谢您的链接。 – Alegro

如何导入没有窗口屏幕更新的工作表？

回答

相关问题