Обработка событий. Напишем событие, которое при открытии отчета, в котором нет данных, выдавало бы на экран специальное сообщение (смотрите рисунок).
MsgBox "Нет данных для печати!", vbExclamation, "Мой калькулятор"
Cancel = True ‘Отменяем открытие отчета