Событие WorkbookBeforeClose возникает непосредственно перед закрытием открытой рабочей книги. Синтаксис процедуры обработки является следующим :

Private Sub object_WorkbookBeforeClose(ByVal Wb As Workbook, ByVal Cancel As Boolean)

Параметр Wb - ссылка на рабочую книгу, которую требуется закрыть Параметр Cancel имеет значение False при возникновении события. Если процедура обработки события присваивает значение True данному параметру, то рабочая книга не закрывается по завершении выполнения процедуры Данное событие используется, например, для выполнения метода Calculate или для исполнения подпрограммы проверки условий на значение:

Private Sub oApp WorkbookBeforeClose(ByVal Wb As Workbook, ByVal Cancel As Boolean)

Application.Calculate
' Вызов внешней подпрограммы проверки условий на значение
ValidateEntries

End Sub

Для комментария : kadan@grsu.grodno.by