Два метода подавления диалога сохранения изменений в Excel не работают

Question

Для тех, кому не нравятся изображения:

  Close logFile
  Application.DisplayAlerts = False 
  If WasOpened2 Then Workbooks(FilenameNoPath(FoundFiles(i))).Close False 
  Application.DisplayAlerts = True

Application.DisplayAlerts = False должен подавлять любые предупреждения от Excel.Более того, я уверен, что передача False в .Close не должна автоматически сохранять изменения в книге.Все же я все еще получаю подсказку.Есть идеи?

Answer 1

Я подозревал, что проблема может быть вызвана другой надстройкой Excel, работающей рядом с ней. Коллега предложил обернуть кодом для подавления событий. Это сработало:

  Application.EnableEvents = False
  Application.DisplayAlerts = False
  If WasOpened2 Then Workbooks(FilenameNoPath(FoundFiles(i))).Close False 
  Application.DisplayAlerts = True
  Application.EnableEvents = True