В Outlook легко создать задачу на основе сообщения электронной почты. Но пробовали ли вы когда-нибудь автоматически создавать задачи при получении определённых писем? Например, я хочу, чтобы задачи автоматически создавались из писем моего руководителя. Как этого добиться в Outlook?

Автоматическое создание Задача при получении указанных писем с помощью кода VBA в Outlook

---

Автоматическое создание Задача при получении указанных писем с помощью кода VBA в Outlook

Прямого метода или правила для решения этой задачи не существует, но я могу объединить код VBA и правило, чтобы справиться с ней. Следуйте инструкциям ниже:

1. Запустите Outlook и нажмите клавиши «ALT + F11», чтобы открыть окно Microsoft Visual Basic for Applications.

2. В окне «Microsoft Visual Basic for Applications» дважды щёлкните «ThisOutlookSession» на панели «Project1 (VbaProject.OTM)», чтобы открыть окно кода, затем скопируйте и вставьте приведённый ниже код в пустой модуль.

Код VBA: автоматическое создание Задача при получении писем:

Sub CreateNewTask(Item As Outlook.MailItem)
Dim xNewTask As TaskItem
On Error Resume Next
Set xNewTask = Outlook.CreateItem(olTaskItem)
With xNewTask
    .Subject = Item.Subject
    .StartDate = Item.ReceivedTime
    .DueDate = Item.ReceivedTime + 1
    .Body = Item.Body
    .Importance = olImportanceHigh
    .Save
End With
Set xNewTask = Nothing
End Sub

3. Затем сохраните и закройте код. После вставки кода необходимо создать правило: перейдите на вкладку «Главная» и выберите «Правила» > «Управление правилами и уведомлениями». См. снимок экрана:

4. В диалоговом окне «Правила и уведомления» нажмите «Создать правило». См. снимок экрана:

5. В открывшемся окне «Мастер правил» в разделе «Создание правила с нуля» выберите пункт «Применять правило к получаемым мной сообщениям». См. снимок экрана:

6. Нажмите кнопку «Далее». В списке «Шаг 1: Выберите условие (условия)» укажите нужное условие — в данном примере выбрана опция «от людей или общих групп». Затем в разделе «Шаг 2: Измените содержимое правила (щёлкните подчёркнутое значение)» нажмите ссылку «люди или общие группы», чтобы открыть диалоговое окно «Адрес правила», и дважды щёлкните адрес электронной почты, от которого вы хотите автоматически создавать задачи. См. снимок экрана:

7. Нажмите «ОК», затем снова — «Далее». В списке «Шаг 1: Выберите действие (действия)» установите флажок «Выполнить сценарий». Далее в разделе «Шаг 2: Измените содержимое правила (щёлкните подчёркнутое значение)» щёлкните ссылку «сценарий». Откроется диалоговое окно «Выбор сценария» — выберите ранее добавленный макрос и нажмите «ОК».

8. Затем последовательно нажмите «Далее» > «Далее», чтобы перейти к экрану завершения настройки правила. В поле «Шаг 1: Укажите имя для этого правила» введите имя правила, а в разделе «Шаг 2: Настройка параметров правила» установите флажок «Включить это правило». См. снимок экрана:

9. Нажмите кнопку «Завершить», а затем — «ОК», чтобы закрыть диалоговое окно «Правила и уведомления».

10. Теперь Outlook будет автоматически создавать задачи при получении писем с указанного адреса. Вы можете просматривать эти задачи в папке «Задачи». См. снимок экрана: