Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 如何在不更新windows屏幕的情况下导入工作表?_Excel_Vba - Fatal编程技术网

Excel 如何在不更新windows屏幕的情况下导入工作表?

Excel 如何在不更新windows屏幕的情况下导入工作表?,excel,vba,Excel,Vba,我需要从另一本书中导入一张纸 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

我需要从另一本书中导入一张纸

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任务栏中,可以看到书本已打开,几秒钟后又关闭。

有没有一种方法可以在不打开目标书的情况下导入工作表,或者在不更新win taskbar的情况下打开工作表?

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

Application.Visible = False
并将此列表添加到代码的末尾

Application.Visible = True

代码运行时,它将隐藏任务栏上的Excel应用程序。

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

Application.Visible = False
并将此列表添加到代码的末尾

Application.Visible = True

当代码运行时,它将隐藏任务栏上的Excel应用程序。

Robert,在这种情况下,整个Excel窗口将隐藏并再次可见。而且plus-win任务栏也会改变。我需要安静地导入一张工作表,屏幕上没有任何东西闪烁。看看这个答案。罗伯特,在这种情况下,整个Excel窗口将隐藏并再次可见。而且plus-win任务栏也会改变。我需要安静地导入一张工作表,屏幕上没有任何东西闪烁。看看这个答案。