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

343
KHes

Добрый день,

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

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

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

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

0
Один из распространенных способов сделать это - иметь официальную «полную» подпись в своем Outlook, а другую - «на моем телефоне» на своем телефоне, когда его нет на рабочем компьютере. Если вам нужно сделать это на том же компьютере, вы можете получить вторичный подписчик, используя вторую почтовую программу или веб-почту, если она доступна. Почему различие подписей вместо того, чтобы поместить офисные часы в одну подпись? Christopher Hostage 5 лет назад 0
Никакой реальной причины из того, что я могу сказать, думая, что это больше просто из-за предпочтений. KHes 5 лет назад 0

1 ответ на вопрос

1
El8dN8

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

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. Теперь добавьте кнопку в раздел «Главная» на ленте: «Файл» → «Параметры» → «Настройка ленты». Создайте новую группу в «Дом (почта)», назовите ее по своему вкусу → Выберите ее и с правой стороны найдите макрос, который вы только что сделали. и нажмите «Добавить».

Удачи!

Ура, приятель, приведу в движение! KHes 5 лет назад 0

Похожие вопросы