Принудительное сохранение книги - Workbook_BeforeClose
Я бы не советовал использовать это, но для экспериментов и для демонстрации ActiveWorkbook.
Вы можете сохранить книгу, не давая пользователю вариант «Да / Нет» с помощью следующего кода:
Поместите это в модуль ThisWorkbook…
| 1234567891011121314 | Private Sub Workbook_BeforeClose (Отменить как логическое)Если сохранено = False, тоActiveWorkbook.SaveКонец, еслиКонец подписки |
Это не работает для нескольких книг. Чтобы он работал с несколькими книгами, вам нужно поместить код в файл personal.xls или заставить его проходить через все открытые книги.
