Событие Application.WorkbookBeforeSave (Excel)

Происходит до сохранения любой открытой книги.

Примечание.

В Office 365 Excel поддерживает функцию автосохранения, благодаря чему изменения пользователя сохраняются автоматически и непрерывно. Дополнительные сведения см. в статье Как автосохранение влияет на надстройки и макросы , чтобы гарантировать, что при включенном автосохранении запущенный код в ответ на событие WorkbookBeforeSave будет работать надлежащим образом.

Синтаксис

выражение. WorkbookBeforeSave (WB, SaveAsUI, Cancel)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Wb	Обязательный	Workbook	Книга.
SaveAsUI	Обязательный	Boolean	Имеет значение "True ", если диалоговое окно "Сохранить как " будет отображаться из-за изменений, которые необходимо сохранить в книге.
Отмена	Обязательный	Boolean	При возникновении события значение false. Если процедура обработки событий устанавливает для этого аргумента значение True, книга не будет сохранена после завершения процедуры.

Возвращаемое значение

Отсутствует

Пример

В этом примере пользователю предлагается ответить "да" или "нет" перед сохранением любой книги.

Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _ 
 ByVal SaveAsUI As Boolean, Cancel as Boolean) 
 a = MsgBox("Do you really want to save the workbook?", vbYesNo) 
 If a = vbNo Then Cancel = True 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.