VBA: макрос который не позволит сохранить файл если ячейка пустая

Автор kotov_dima, 28 марта 2017, 20:10

kotov_dima

Добрый день. Есть файл в котором ставится число, оценка (выделено оранжевым).
Если число 0 или если число больше 100, то в столбце "Комментарий" нужно написать текст. Если комментарий не написан, то макрос не позволит сохранить файл. Это возможно? Если да, то прошу помочь. Файл прилагается. Спасибо.

[вложение удалено администратором]

Администратор

Макрос состоит из двух модулей:
1) модуль книги. Здесь находится событие "Workbook_BeforeSave", которое срабатывает, когда юзер или макрос сохраняет файл;
2) модуль "Module3". Здесь собственно находится сам макрос.

[вложение удалено администратором]

kotov_dima

Спасибо!
И если будет несколько таких листов не возникнет проблем? Получается на каждом листе нужно прописывать код?

Администратор

Да, в модуль каждого листа вставьте код, который сейчас находится в модуле листа "Станция 1".
А модуль "Module3", так и будет один для всех.
Проблем не будет. Главное, чтобы у всех листов была одинаковая структура, как на листе "Станция 1", т.к. в макросе указаны конкретные строки и столбцы.