Note: The other languages of the website are Google-translated. Back to English
Войти  \/ 
x
or
x
Регистрация  \/ 
x

or

Как переместить сообщение электронной почты в указанную папку после чтения в Outlook?

Перемещение сообщения электронной почты в указанную папку после прочтения - лучший способ сохранить чистоту папки «Входящие» в Outlook. Многие пользователи Outlook, как правило, создают правило для перемещения этих прочитанных писем. На самом деле Outlook не поддерживает этот процесс мастера правил. В этой статье мы покажем вам, как переместить сообщения электронной почты в указанную папку после чтения с кодом VBA в Outlook.

Переместить сообщение электронной почты в указанную папку после чтения в Outlook

Вкладка Office - включите редактирование и просмотр с вкладками в Office и сделайте работу намного проще ...
Kutools for Outlook - приносит 100 мощных расширенных функций в Microsoft Outlook
  • Авто CC / BCC по правилам при отправке электронной почты; Автопересылка Множественные письма по правилам; Автоответчик без сервера обмена и дополнительных автоматических функций ...
  • Предупреждение BCC - показывать сообщение при попытке ответить всем, если ваш почтовый адрес находится в списке BCC; Напоминать об отсутствии вложений, и многое другое напоминает функции ...
  • Ответить (всем) со всеми вложениями в почтовой переписке; Отвечайте сразу на несколько писем; Автоматическое добавление приветствия при ответе; Автоматически добавлять дату и время в тему ...
  • Инструменты для вложения: Автоотключение, Сжать все, Переименовать все, Автосохранение всех ... Быстрый отчет, Подсчет выбранных писем, Удаление повторяющихся писем и контактов ...
  • Более 100 дополнительных функций будут решить большинство ваших проблем в Outlook 2010-2019 и 365. Полнофункциональная 60-дневная бесплатная пробная версия.

стрелка синий правый пузырьПереместить сообщение электронной почты в указанную папку после чтения в Outlook

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

1. Во-первых, вам нужно создать новую папку с именем «Отзыв»В папке« Входящие ».

2. Откройте папку «Входящие», затем нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

3. Затем дважды щелкните, чтобы развернуть Project1 > Объекты Microsoft Outlook > ThisOutlookSession для открытия VbaProject.OTM редактор.

4. Затем скопируйте и вставьте приведенный ниже код VBA в редактор VbaProject.OTM, как показано на скриншоте выше.

Код VBA: перемещать сообщения после прочтения

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. Затем нажмите скидка кнопку, чтобы сохранить код VBA, а затем закройте Microsoft Visual Basic для приложений окно.

6. Щелкните правой кнопкой мыши Панель быстрого доступаИ выберите Настройка панели быстрого доступа из контекстного меню. Смотрите скриншот:

7. в Параметры Outlook диалоговое окно, вам необходимо:

1). Выбрать Макрос в Выберите команды из раскрывающийся список;

2). Выбрать Проект1. ThisOutlookSession в коробке под Выберите команды из раскрывающийся список;

3). Щелкните значок Добавить кнопка;

4). Щелкните значок OK кнопку.

8. Затем вы увидите Макрос кнопка отображается в Панель быстрого доступа. Убедитесь, что вы находитесь в папке «Входящие», из которой хотите переместить все прочитанные сообщения, затем щелкните значок Макрос кнопку, чтобы запустить код VBA внутри папки «Входящие».

Заметки:

1. Этот код VBA можно применять в Outlook 2007, 2010 и 2013; Но в Outlook 2007 вы можете напрямую щелкнуть Выполнить кнопку для запуска кода.

2. Если в Outlook существует несколько учетных записей электронной почты, код VBA можно применить только к учетной записи, файл данных которой установлен по умолчанию. Вы можете проверить файл данных по умолчанию, нажав Файл > Инфо > Настройки учетной записи > Настройки учетной записи для открытия Настройки учетной записи диалоговое окно. Затем перейдите в Файл данных вкладка, вы увидите, что файл данных по умолчанию отмечен раньше.

3. Если вы хотите изменить файл данных по умолчанию на другую учетную запись электронной почты, выберите и выделите учетную запись, которую вы хотите установить по умолчанию, затем нажмите кнопку Установить по умолчанию в Настройки учетной записи диалоговое окно.

4. При первом запуске кода VBA и обнаружении, что прочитанные сообщения не перемещаются сразу, продолжайте нажимать кнопку «Макрос», пока все прочитанные сообщения в папке «Входящие» не будут перемещены.


Kutools for Outlook - добавляет в Outlook 100 расширенных функций и делает работу намного проще!

  • Авто CC / BCC по правилам при отправке электронной почты; Автопересылка Несколько писем по индивидуальному заказу; Автоответчик без сервера обмена и дополнительных автоматических функций ...
  • Предупреждение BCC - показать сообщение при попытке ответить всем если ваш почтовый адрес находится в списке BCC; Напоминать об отсутствии вложений, и многое другое напоминает функции ...
  • Ответить (всем) со всеми вложениями в почтовой беседе; Ответить на много писем в секундах; Автоматическое добавление приветствия при ответе; Добавить дату в тему ...
  • Инструменты для вложений: управление всеми вложениями во всех письмах, Авто отсоединение, Сжать все, Переименовать все, сохранить все ... Быстрый отчет, Подсчет выбранных писем...
  • Мощные нежелательные электронные письма по обычаю; Удаление повторяющихся писем и контактов... Позвольте вам делать в Outlook умнее, быстрее и лучше.
выстрел kutools outlook kutools tab 1180x121
выстрел kutools outlook kutools plus tab 1180x121
 

 

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Augusto · 1 years ago
    What if Only want to move read messages not from the main Inbox but from an Inbox sub-folder to the "Reviewed" folder?
  • To post as a guest, your comment is unpublished.
    Augusto · 1 years ago
    What if Only want to move read messages not from the main Inbox but from an Inbox sub-folder to the "Reviewed" folder?
  • To post as a guest, your comment is unpublished.
    EM · 1 years ago
    I used this VBA code, but now all of the emails moved to "Reviewed" are gone? Any ideas why?
  • To post as a guest, your comment is unpublished.
    Becky · 1 years ago
    has anyone had this not work the second time you tried to apply it?
  • To post as a guest, your comment is unpublished.
    fabio · 3 years ago
    Buongiorno


    Esiste la versione per Outlook 365 in italiano (non so se cambia qualcosa). Grazie
  • To post as a guest, your comment is unpublished.
    Jake · 3 years ago
    What line do I add when I only want this rule to apply to emails with a subject line including a word or text?
  • To post as a guest, your comment is unpublished.
    Keldon · 4 years ago
    Where's all the Dim's?????????????????????/ o.0
  • To post as a guest, your comment is unpublished.
    Karlton Hoskins · 4 years ago
    I tried the above method but nothing happens. I verified the folder name was accurate and in the right location. I also set my main account as default, where i will be moving read messages from. I click on the Macro button...nothing. Help. Did I miss something.
    • To post as a guest, your comment is unpublished.
      . · 3 years ago
      You have to activate the references in VBA
  • To post as a guest, your comment is unpublished.
    Liz · 4 years ago
    Can this VBA code be altered to move messages from an Inbox subfolder to a "Reviewed" folder in said subfolder?