excel - application.screenupdating=false 创建新工作簿时

Question

我有一些看起来像这样的代码：

 sub my_code()

Application.ScreenUpdating = False 

    'do lots of my things on my active workbook

    'then I create a new workbook and do stuff on that
    'looks like this:

    filePath = ThisWorkbook.Path & "\"
    fileName = Format(Date, "YYYY-MM-DD") & ".xlsx"    
    fileFullPath = filePath & fileName     
    Set newBook = Workbooks.Add
    newBook.SaveAs fileFullPath
    ThisWorkbook.Sheets("Summary").Copy Before:=Workbooks(fileName).Sheets(1)
    newBook.Sheets("Summary").UsedRange.Copy

 Application.ScreenUpdating = True

End Sub

如您所见，我正在尝试消除宏运行时的闪烁。当我在我的活动工作簿上工作时不会发生闪烁，但只要我开始在新工作簿上工作，就会再次开始闪烁。为什么会发生这种情况，我该如何阻止它？

标签： excelvba