Иногда вам может потребоваться автоматически отправить приветственное сообщение контакту, когда у него сегодня день рождения в Outlook. Это будет утомительная работа, если вы будете проверять день рождения контакта один за другим и отправлять поздравительные электронные письма вручную. В этой статье я представлю код VBA, который поможет быстро и легко решить эту проблему.
Автоматическая отправка приветственного сообщения контакту в зависимости от его дня рождения с помощью кода VBA в Outlook
Автоматическая отправка приветственного сообщения контакту в зависимости от его дня рождения с кодом VBA в Outlook
Чтобы автоматически отправить приветственное сообщение контакту, если его день рождения сегодня, сначала вставьте код VBA, а затем вам нужно создать повторяющуюся задачу для запуска кода.
Вам могут помочь следующие шаги:
1 . Запустите Outlook, а затем удерживайте клавиши ALT + F11 , чтобы открыть окно Microsoft Visual Basic для приложений .
2 . В окне Microsoft Visual Basic для приложений дважды щелкните ThisOutlookSession на панели Project1 (VbaProject.OTM) , чтобы открыть режим, а затем скопируйте и вставьте следующий код в пустой модуль.
Код VBA: автоматическая отправка приветственного сообщения контакту в зависимости от дня рождения:
3 . Затем нажмите Инструменты > Ссылки в окне Microsoft Visual Basic для приложений во всплывающем окне В диалоговом окне «Ссылки-Project1 установите флажок Библиотека объектов Microsoft Word и Среда выполнения сценариев Microsoft в разделе Доступные ссылки список, см. снимок экрана:
4 . Затем нажмите OK , чтобы закрыть диалоговое окно. Теперь вы должны создать задачу для запуска кода VBA. Перейдите на панель Задача , нажмите Новая задача , чтобы создать задачу:
(1.) В Subjec t, введите тему как Отправить письмо с поздравлением с днем рождения ;
(2.) Затем нажмите Повторение на вкладке Задача ;
(3.) В диалоговом окне Повторение задачи выберите Ежедневно и укажите параметр каждые 1 день (а) в разделе Шаблон повторения ;
5 . Затем нажмите OK , чтобы закрыть диалоговое окно, вернитесь в окно задачи, установите напоминание для повторяющейся задачи, как показано на следующем снимке экрана:
6 . С этого момента, когда напоминание предупреждает, макрос будет запускаться немедленно. Появится диалоговое окно, напоминающее вам о вставке поздравления с днем рождения, как показано на следующем снимке экрана:
7 . Затем нажмите кнопку OK , и контакту, чей день рождения сегодня, будет автоматически отправлено приветственное письмо.
->
Рекомендуемые инструменты повышения производительности для Outlook ->
Kutools для Outlook – добавляет в Outlook 100 дополнительных функций и делает работу намного проще!
- Автоматическая копия/скрытая копия по правилам при отправке электронной почты; Автоматическая пересылка нескольких писем по индивидуальному заказу; Автоматический ответ без сервера обмена и другие автоматические функции …
- Предупреждение о скрытой копии – показывать сообщение при попытке ответить всем, если ваш почтовый адрес находится в списке скрытой копии; Напоминать при отсутствии вложений и другие функции напоминания …
- Ответить (всем) со всеми вложениями в почтовой беседе; Ответить на множество писем за секунды; Автоматическое добавление приветствия при ответе; Добавить дату в тему …
- Инструменты вложений: управление всеми вложениями во всех сообщениях, автоматическое отключение, сжатие всех, переименование всех, сохранение всех … Быстрый отчет, подсчет выбранных сообщений …
- Мощные нежелательные сообщения электронной почты по индивидуальному заказу; Удаление повторяющихся писем и контактов … Позволяет работать в Outlook умнее, быстрее и лучше.
Подробнее … Загрузить сейчас … Покупка ->
Источник: