Подпись Outlook по времени

Question

Добрый день,

В настоящее время у меня есть клиент, который испытывает некоторые проблемы с его подписями в Outlook.

В рамках своей деятельности к нижней части его подписи прикреплено заявление об отказе от ответственности, в котором говорится, что электронное письмо было отправлено в рабочее время.

Он пытается выяснить, есть ли какой-то способ, кроме ручного выбора между двумя сигнатурами электронной почты, автоматически использовать подпись при ответе / отправке электронных писем в определенные моменты времени и другую публикацию в те времена.

Насколько я знаю, и те, с кем я работаю, невозможны, однако я подумал, что задам вопрос на всякий случай.

Answer 1

Вот макрос, который должен выполнять ту работу, которую вы ищете; просто измените его по своему вкусу.

Public Sub CreateMessageSignature()
    Dim objMsg As MailItem
    Dim theDay As Integer
    Dim hoursStart, hoursEnd As Double
    Dim custom As String
    Set objMsg = Application.CreateItem(MailItem)
    theDay = Weekday(Now)
    hoursStart = TimeValue("8:00:00 am")
    hoursEnd = TimeValue("4:30:00 pm")
    custom = "This message is sent out of office hours."
    If theDay > 1 And theDay < 7 Then ' Mon-Fri
        If Now > hoursStart And Now < hoursEnd Then ' The current time is between office hours
           custom = "This message is sent during office hours."
        End If
    End If
    With objMsg
      .HTMLBody = "Greetings,<br><br>&emsp;Sincerely,<br><br>John Smith<br>contact@example.com<br>(123)-456-7890<br>" & custom & strBuffer
      .Display
    End With

End Sub

Если вы не знаете, как его настроить:

1. Включите меню "Разработчик" в Outlook: "Файл" → "Параметры" → "Настройка ленты" → "Пузырь" в меню "Разработчик".
2. Создайте макрос: Меню разработчика → Макросы → Введите имя, в частности CreateMessageSignature (если вы не хотите переименовать функцию, которую вы можете) → Нажмите "Создать" → Скопируйте и вставьте макрос (остерегайтесь отступов) → Изменить по своему вкусу → Сохранить (Ctrl+S)
3. Теперь добавьте кнопку в раздел "Главная" на ленте: "Файл" → "Параметры" → "Настройка ленты". Создайте новую группу в «Дом (почта)», назовите ее по своему вкусу → Выберите ее и с правой стороны найдите макрос, который вы только что сделали. и нажмите "Добавить".

Удачи!