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

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

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

Мне удалось добраться только до следующего фрагмента кода:

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

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

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

решение1

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

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

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

Связанный контент