Используйте макрос-рекордер, чтобы вставить текстовое поле и ввести в него что угодно. Остановите рекордер. Откройте редактор VB (alt-F11 сделает это). Вырежьте записанный макрос из модуля и вставьте его в модуль объекта листа. В этом модуле будет несколько выпадающих окон. Используйте тот, который читает "Общие" и измените его на "Рабочий лист". Затем используйте раскрывающийся список справа от него, чтобы выбрать "sheet_activate" или "before_print", или сделать оба. Сейчас я нахожусь на linux, поэтому я не могу сделать быстрый просмотр, но вам, возможно, придется использовать модуль "Рабочая книга", чтобы получить событие "before_print". Когда вы выбираете эти вещи, вставляется заглушка кода. Вы будете использовать макрос, который вы записали в качестве шаблона для кода, который вы вставили в заглушки. Ознакомьтесь с функциями Now (), Date () и Format (). Вы также должны выяснить это, вы можете заменить текст в существующем текстовом поле или уничтожить и воссоздать его каждый раз. Извините, это скорее подсказка, чем инструкция. Это должно быть легко сделать. Если гугл и небольшая настойчивость не дают желаемого результата, оставьте комментарий здесь. Я могу показать вам весь код, чтобы сделать это. Путешествие 7 сентября, поэтому не буду отвечать в этот день. Удачи.