Как быстро удалить несколько почтовых папок Outlook в пакетном режиме

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

Как обычно, если вы собираетесь удалить одну почтовую папку, доступны два метода. Как показано на следующем снимке экрана, во-первых, вы можете щелкнуть правой кнопкой мыши эту почтовую папку, а затем выбрать «Удалить папку» в ее контекстном меню. Другой заключается в том, что вы должны перейти на вкладку «Папка» и нажать кнопку «Удалить папку».

Очевидно, что оба они довольно просты. Однако, если вы используете либо для удаления нескольких папок, это будет довольно проблематично. Многие пользователи заявили, что хотят удалить несколько папок просто за один раз. Если все эти папки являются подпапками в определенной папке, как на картинке выше, вы действительно можете использовать Outlook VBA, чтобы удалить их одним щелчком мыши. Но если нет, вам нужно приложить некоторые дополнительные усилия. Читайте дальше, чтобы получить их в деталях.

Если эти папки являются подпапками в определенной папке

1. К starт с, запустите Outlook.
2. Затем нажмите сочетание клавиш «Alt + F11», чтобы открыть редактор VBA.
3. Затем во всплывающем окне вы должны открыть модуль, который не используется, или вставить новый модуль, нажав «Вставить»> «Модуль».
4. Впоследствии в него нужно скопировать следующие коды.

Sub DeleteMultipleFolders()
    Dim objCurrentFolder As Folder
    Dim objSubFolders As Folders
    Dim i As Long
 
    On Error Resume Next
 
    Set objCurrentFolder = Outlook.Application.ActiveExplorer.CurrentFolder
    Set objSubFolders = objCurrentFolder.Folders
 
    For i = objSubFolders.Count To 1 Step -1
        objSubFolders.Item(i).Delete
    Next
End Sub

5. После этого вы можете выйти из текущего окна и добавить новый макрос на панель быстрого доступа.
6. Наконец-то можно попробовать.

• Сначала выберите основную папку.
• Затем нажмите кнопку макроса на панели быстрого доступа.
• Сразу все подпапки будут удалены.

Вышеупомянутый трюк будет очень удобен, если все эти папки являются подпапками в определенной папке. Но если удаляемые папки находятся в разных папках, необходимо произвести некоторые дополнительные операции. Следуйте инструкциям ниже.

Если эти папки не являются подпапками в определенной папке

1. Для начала создайте новую папку под названием «Temp».

• Во-первых, укажите правильный файл PST.
• Затем нажмите кнопку «Новая папка» на вкладке «Папка».
• Затем введите «Temp» в поле «Name».
• В конце концов, нажмите кнопку «ОК».

2. Впоследствии вам нужно перетащить папки, которые вы собираетесь удалить, в папку «Temp».
3. После того, как все эти папки будут перемещены и размещены в папке «Temp», вы можете использовать макрос, упомянутый в первом разделе, для удаления всех этих подпапок в «Temp».

Никогда не переходите по ссылкам в неизвестных письмах

Помимо ваших собственных макросов, вы должны быть осторожны со всеми внешними макросами, поскольку они могут содержать вирусы. Как обычно, эти вредоносные макросы маскируются под безобидные ссылки в электронных письмах. Поэтому, если вы не можете определить отправителя электронного письма, вам лучше не загружать его вложения и не нажимать на его ссылки. В противном случае ваши данные Outlook могут быть заражены. Таким образом, для восстановления вашего поврежденный Outlook data, утилита входящих сообщений Scanpst.exe не поможет. Вам нужно прибегнуть к внешнему инструменту, например DataNumen Outlook Repair.

Об авторе:

Ширли Чжан — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая восстановить sql и программные продукты для ремонта Outlook. Для получения дополнительной информации посетите www.datanumen.com