Если в папке «Входящие» есть несколько непрочитанных писем, обычно вы можете применить функцию «Пометить все как прочитанные», чтобы вручную пометить все непрочитанные письма как прочитанные. Но пытались ли вы когда-нибудь пометить непрочитанные электронные письма, которые старше определенных дней, как автоматически прочитанные в Outlook, не настраивая каждый раз вручную?
Пометить непрочитанные электронные письма старше определенных дней как читать автоматически с помощью кода VBA
Пометить непрочитанные электронные письма старше определенных дней как прочитанные автоматически с помощью кода VBA
Чтобы автоматически отмечать все непрочитанные электронные письма старше определенных дней как прочитанные, следующий код VBA может оказать вам услугу:
1 . Удерживая нажатыми клавиши ALT + F11 , откройте окно Microsoft Visual Basic для приложений .
2 . В окне Microsoft Visual Basic для приложений дважды щелкните ThisOutlookSession на панели Project1 (VbaProject.OTM) , чтобы открыть режим, а затем скопируйте и вставьте приведенный ниже код в пустой модуль.
Код VBA: автоматическая пометка непрочитанных писем старше определенных дней как прочитанных:
Примечание . В приведенном выше коде вы можете изменить количество дней в этом скрипте: If DateDiff (“d”, xItems (i) .ReceivedTime, Now)> = 15 Затем на ваше усмотрение.
3 . Затем сохраните и закройте это окно кода, с тех пор каждый раз, когда вы запускаете Outlook, все непрочитанные электронные письма, которые старше заранее определенных дней, будут автоматически отмечаться как прочитанные.
Примечание . Этот код доступен только для учетной записи по умолчанию.
->
Рекомендуемые инструменты повышения производительности для Outlook ->
Kutools for Outlook – добавляет 100 дополнительных функций в Outlook и делает работу Намного проще!
- Автоматическая копия/скрытая копия по правилам при отправке электронной почты; Автоматическая пересылка нескольких писем по индивидуальному заказу; Автоматический ответ без сервера обмена и другие автоматические функции …
- Предупреждение о скрытой копии – показывать сообщение при попытке ответить всем, если ваш почтовый адрес находится в списке скрытой копии; Напоминать при отсутствии вложений и другие функции напоминания …
- Ответить (всем) со всеми вложениями в почтовой беседе; Ответить на множество писем за секунды; Автоматическое добавление приветствия при ответе; Добавить дату в тему …
- Инструменты вложений: управление всеми вложениями во всех сообщениях, автоматическое отключение, сжатие всех, переименование всех, сохранение всех … Быстрый отчет, подсчет выбранных сообщений …
- Мощные нежелательные сообщения электронной почты по индивидуальному заказу; Удаление повторяющихся писем и контактов … Позволяет работать в Outlook умнее, быстрее и лучше.
Подробнее … Загрузить сейчас … Купить ->
Источник: