Блокировка общей книги

[iNataliya]

Доброго всем времени суток.

Вопрос вот в чем. Есть общий файл Эксель. Иногда случаются что какой-нибудь сотрудник, нажимает кнопку сохранить и убегает. В результате у него на рабочем столе висит окно подтверждения сохранения файла с кнопками да/нет и файл блокируется намертво для всех остальных - у них вылетает ошибка "файл заблокирован".
Подскажите, есть ли возможность в Эксель написать макрос, который перед сохранением будет проверять не заблокирован ли файл, и если заблокирован писать кем.
Или может быть есть другие варианты решения такой проблемы?
P.S. Решения, связанные с санкциями к нерадивым сотрудникам, к сожалению делу не помогут )

[Pavlov_yu]

Открываете книгу, нажимаете Alt+F11, в VBAProgect(Ctrl+r) выделяете "Эта Книга" в выпадающем списке объекта выберите "WorkBook", и вставьте следующее-

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub

при нажатии на крестик закрытия документа автоматом сохранит без запроса подтверждения

[iNataliya]

Спасибо. Думаю поможет