В модуле объекта документа реглотчетность в событии при записи сделал проверку. В итоге получилось, то что хотел.
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс
