У меня есть код, который выглядит примерно так:
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
Итак, как вы можете видеть, я пытаюсь избавиться от перепрошивки при запуске макроса. Перепрошивка не происходит, когда я выполняю работу над своей активной рабочей книгой, но как только я начинаю работу над новой рабочей книгой, перепрошивка начинается снова. Почему это происходит, как мне это остановить?