Таны Outlook дахь бүх хайлтын хавтсыг хэрхэн багцаар устгах вэ

Анхдагч байдлаар Outlook нь хэрэглэгчдэд нэгээс илүү хайлтын хавтасыг нэг дор устгахыг зөвшөөрдөггүй бөгөөд бүх хайлтын хавтсыг бөөнөөр нь устгах нь бүү хэл. Гэхдээ энэ нийтлэл нь үүнийг хэрэгжүүлэх аргыг танд хуваалцах болно.

Ерөнхийдөө хайлтын фолдерыг устгахын тулд та хулганыхаа баруун товчийг дараад контекст цэснээс "Устгах Фолдер" сонголтыг сонгож болно. Ийм байдлаар та хайлтын бүх фолдеруудаа устгах шаардлагатай үед үүнийг нэлээд уйтгартай, төвөгтэй гэж үзэх нь дамжиггүй. Та бүгдийг нь нэг дор устгахыг хүсэх ёстой. Тиймээс энд устгалтыг богино хугацаанд гүйцэтгэхэд тань туслах арга хэрэгслийг танд танилцуулах болно.

Бүх хайлтын хавтсыг багцаар нь устгах

1. Хамгийн эхэнд та Outlook програмаа ердийн байдлаар эхлүүлэх ёстой.
2. Дараа нь үндсэн Outlook дэлгэц рүү нэвтэрсний дараа та "Alt + F11" товчлууруудыг дарах хэрэгтэй.
3. Та нэг дор “Програмд ​​зориулсан Microsoft Visual Basic” цонхонд орно.
4. Дараа нь та ашиглагдаагүй байгаа модулийг олж нээх хэрэгтэй.
5. Дараа нь та дараахь VBA кодыг хуулж аваад энэ модуль дээр буулгаж болно.

Sub BatchDeleteAllSearchFolders()
    Dim objStores As Outlook.Stores
    Dim objStore As Outlook.store
    Dim objSearchFolders As Outlook.Folders
    Dim objSearchFolder As Outlook.Folder

    On Error Resume Next
    Set objStores = Outlook.Application.Session.Stores
 
    For Each objStore In objStores
        'Get all search folders under each Outlook data file
        Set objSearchFolders = objStore.GetSearchFolders
        For Each objSearchFolder In objSearchFolders
            'Delete each search folder
            objSearchFolder.Delete
        Next
    Next
End Sub

Тайлбар:

• Магадгүй та Outlook дээр хэд хэдэн имэйл данс тохируулсан байх. Мөн тус бүр өөрийн гэсэн PST файлтай байдаг. Файл бүрт та зарим хайлтын хавтас үүсгэж болно. Дээрх кодоор бүх файлын хавтас нь ямар файлд байгаагаас үл хамааран устах болно.
• Хэрэв та Outlook өгөгдлийн файлыг зааж өгөхийг хүсвэл "ObjStore In objStores тус бүрт" гэсэн мөрийг нэмж оруулах боломжтой. Энд та "Жон Смит" -ийг өөрийн PST файлын нэр болгон өөрчлөх хэрэгтэй.

If objStore.DisplayName = "John Smith" Then
 . . . . . . . . . . . . . . .
End If

6. Үүний дараа та Outlook макро аюулгүй байдлын түвшинг доод түвшинд өөрчлөх хэрэгтэй.
7. Эцэст нь энэхүү програмыг ажиллуулахын тулд “Microsoft Visual Basic for Applications” цонхонд F5 товчийг дарах боломжтой.
8. Макро дууссаны дараа Outlook дээрх бүх хайлтын хавтас устгагдсан болохыг олж мэдэх болно.

Өөрийн Outlook өгөгдлийг хамгаалах

Outlook нь гэмтэх хандлагатай тул та Outlook өгөгдлийг сайн хамгаалахын тулд маш их хүчин чармайлт гаргах хэрэгтэй. Хамгийн чухал аргуудын нэг нь эргэлзээгүй Outlook файлуудаа тогтмол, шинэчилсэн нөөцлөлт хийх явдал юм. Цаашилбал, хэрэв ийм тохиолдолд яаралтай аврах боломжтой. Авлигын төлөв байдал, гэх мэт уян хатан, нэр хүндтэй засах хэрэгслийг бэлтгэх нь дээр байсан DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. sql сэргээх програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com