Перейти к содержимому

Как переместить электронные письма от неизвестных отправителей в определенную папку в Outlook? 

Author: Xiaoyang Last Modified: 2025-06-05

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

Переместите письма от неизвестных отправителей в определенную папку, создав правило

Переместите письма от неизвестных отправителей в определенную папку, применив код VBA


Переместите письма от неизвестных отправителей в определенную папку, создав правило

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

1. Создайте новую папку под папкой Входящие, которая будет размещать письма от неизвестных отправителей, как показано на следующем скриншоте:

doc move emails from unknown 1

2. Затем нажмите Главная > Правила > Управление правилами и оповещениями, см. скриншот:

doc move emails from unknown 2

3. В диалоговом окне Правила и оповещения нажмите Новое правило под вкладкой Правила для электронной почты, см. скриншот:

doc move emails from unknown 3

4. И нажмите кнопку ОК, чтобы перейти к Мастеру правил, выберите параметр Применить правило к сообщениям, которые я получаю из раздела Начать с пустого правила, см. скриншот:

doc move emails from unknown 4

5. Затем нажмите кнопку Далее, на этом этапе, пожалуйста, не выбирайте никаких параметров, и сразу нажмите Далее, появится предупреждающее окно, пожалуйста, нажмите Да, см. скриншот:

doc move emails from unknown 5

6. В следующем диалоговом окне отметьте параметр переместить его в указанную папку в списке действий Шаг 1: Выберите действие(я), затем нажмите связанный текст указанный, и в открывшемся диалоговом окне Правила и оповещения укажите папку, куда вы хотите переместить письма, см. скриншот:

doc move emails from unknown 6

7. Нажмите ОК, и продолжайте нажимать Далее, в этом диалоге Есть ли исключения, отметьте параметр за исключением если отправитель находится в указанной Адресной книге в списке исключений Шаг 1: Выберите исключение(я), затем нажмите связанный текст указанный, и появится окно Добавить список адресов, выберите папку контактов, содержащую контакты, которые вы хотите исключить, см. скриншот:

doc move emails from unknown 7

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

doc move emails from unknown 8

9. И затем нажмите кнопки Готово и ОК, чтобы закрыть диалоговые окна. С этого момента, когда письма будут приходить от неизвестных отправителей, они будут автоматически перемещаться в указанную папку.

AI Mail Assistant в Outlook: Умные ответы, четкое общение (волшебство в один клик!) БЕСПЛАТНО

Оптимизируйте свои ежедневные задачи в Outlook с помощью AI Mail Assistant от Kutools для Outlook. Этот мощный инструмент изучает ваши прошлые письма, чтобы предлагать умные и точные ответы, оптимизировать содержание ваших писем и помогать легко создавать и редактировать сообщения.
doc ai email handle

Эта функция поддерживает:

  • Умные ответы: Получайте ответы, созданные на основе ваших предыдущих разговоров — персонализированные, точные и готовые к отправке.
  • Улучшенное содержание: Автоматически улучшайте текст ваших писем для большей ясности и воздействия.
  • Простое составление: Просто укажите ключевые слова, и пусть ИИ сделает остальную работу, предлагая несколько стилей написания.
  • Интеллектуальные расширения: Расширяйте свои мысли с помощью контекстно-зависимых предложений.
  • Суммаризация: Мгновенно получайте краткие обзоры длинных писем.
  • Глобальный охват: Легко переводите ваши письма на любой язык.

Эта функция поддерживает:

  • Умные ответы на письма
  • Оптимизированное содержание
  • Черновики на основе ключевых слов
  • Интеллектуальное расширение содержания
  • Краткое изложение писем
  • Перевод на несколько языков

Лучше всего то, что эта функция будет полностью бесплатной навсегда! Не ждите — скачайте AI Mail Assistant прямо сейчас и наслаждайтесь


Переместите письма от неизвестных отправителей в определенную папку, применив код VBA

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

1. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

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

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

Public WithEvents MailItems As Outlook.Items
Private Sub Application_Startup()
    Set MailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub MailItems_ItemAdd(ByVal item As Object)
Dim xSenderEmailAddress As String
Dim xContactItems As Outlook.Items
Dim xContactItem As ContactItem
Dim I As Long
Dim xFilter As String
Dim xTargetFolder As Folder
Dim xContactFolder As Folder
Dim xStore As Store
Dim xInboxFlds As Folders
Dim xSubFolder As Folder
Dim xFound As Boolean
On Error Resume Next
If item.Class = olMail Then
    xSenderEmailAddress = item.SenderEmailAddress
End If
For Each xStore In Outlook.Application.Session.Stores
    Set xContactItems = xStore.GetDefaultFolder(olFolderContacts).Items
    For I = 3 To 1 Step -1
        xFilter = "[Email" & I & "Address] = " & xSenderEmailAddress
        Set xContactItem = xContactItems.Find(xFilter)
        If TypeName(xContactItem) <> "Nothing" Then Exit For
    Next
Next
If xContactItem Is Nothing Then
    Set xInboxFlds = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders
    xFound = False
    For Each xSubFolder In xInboxFlds
        If xSubFolder.Name = "Unknown" Then
            xFound = True
            Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders("Unknown")
            Exit For
        End If
    Next
    If xFound = False Then
        Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders.Add("Unknown")
    End If
    item.Move xTargetFolder
End If
End Sub

doc move emails from unknown 9

3. Затем сохраните код и закройте окно кода, и перезапустите Outlook, чтобы код вступил в силу. С этого момента, когда письма будут приходить от некоторых неизвестных отправителей, они будут автоматически перемещаться в папку Неизвестные, см. скриншот:

doc move emails from unknown 10

Примечание: Папка Неизвестные будет создана автоматически, когда поступят некоторые неизвестные письма. Вы можете изменить имя папки «Неизвестные» на другое в скрипте.


Лучшие инструменты для повышения продуктивности в Office

Срочные новости: Kutools для Outlook запускает бесплатную версию!

Оцените совершенно новую бесплатную версию Kutools для Outlook с более чем70 потрясающими функциями — пользуйтесь ими НАВСЕГДА! Нажмите, чтобы скачать прямо сейчас!

🤖 Kutools AI : Использует передовые технологии искусственного интеллекта для легкой работы с Email: отвечает, резюмирует, оптимизирует, расширяет, переводит и составляет письма.

📧 Автоматизация Email: Автоответчик (доступно для POP и IMAP) / Запланировать отправку писем / Авто Копия/Скрытая копия по правилу при отправке писем / Автоматическое перенаправление (Расширенное правило) / Автоматическое добавление приветствия / Автоматическое разделение писем с несколькими получателями на отдельные сообщения ...

📨 Управление Email: Отозвать письмо / Блокировать мошеннические письма по теме и другим параметрам / Удалить дубликаты писем / Расширенный Поиск / Организовать папки ...

📁 Вложения Pro: Пакетное сохранение / Пакетное открепление / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие ...

🌟 Магия интерфейса: 😊Больше красивых и крутых Эмодзи / Напоминание о важных письмах / Сворачивайте Outlook вместо закрытия ...

👍 Мгновенные действия: Ответить всем с вложениями / Антифишинговые Email / 🕘Показать часовой пояс отправителя ...

👩🏼‍🤝‍👩🏻 Контакты и Календарь: Пакетное добавление контактов из выбранных писем / Разделить группу контактов на отдельные группы / Удалить напоминание о дне рождения ...

Мгновенно активируйте Kutools для Outlook одним кликом. Не ждите — скачайте сейчас и повысьте свою эффективность!

kutools for outlook features1 kutools for outlook features2