Добавить сегодняшнюю дату при открытии сохраненного шаблона электронной почты

Я хочу добавить сообщение и дату, когда я открою шаблон электронной почты, который я сохранил.

Мне удалось только добраться до кода ниже:

Private Sub adddate()
    .Item.Subject = "Prep Status Report " & Format(Date, "dd/MM/yyyy")
End Sub

Как я могу улучшить это, чтобы он работал как задумано.

Тема письма должна гласить: Prep Status Report 10/12/2018 если запустить 10 декабря

Вы можете вставить свою строку кода в код для метода 2 в «2 Быстрых методах для создания новых электронных писем из шаблона с Outlook VBA» в https://www.datanumen.com/blogs/2-quick-methods-create-new-emails-template-outlook-vba/

• В вашей строке кода измените .Item в NewMail,
• в коде из Datanumen измените путь к файлу вашего шаблона.

Также вы можете добавить макрос на панель быстрого доступа, если хотите запустить его одним щелчком мыши.