Az összes keresési mappa kötegelt törlése az Outlookban

Alapértelmezés szerint az Outlook nem engedélyezi a felhasználóknak, hogy egyszerre több keresési mappát töröljenek, nem beszélve az összes keresési mappa tömeges törléséről. De ez a cikk megoszt egy módszert, amellyel megvalósítható.

Általában egy keresési mappa törléséhez kattintson a jobb gombbal az egyikre, és válassza ki a „Mappa törlése” lehetőséget a helyi menüből. Ily módon, ha törölnie kell az összes keresési mappát, biztosan azt fogja gondolni, hogy ez elég fárasztó és nehézkes. Egyszerre törölni kell az összeset. Így itt bemutatunk Önnek egy olyan eszközt, amely egy pillanat alatt segíthet a törlés végrehajtásában.

Az összes keresési mappa kötegelt törlése

1. A legelején a szokásos módon kell elindítania az Outlookot.
2. Ezután az Outlook fő képernyőjének elérése után meg kell nyomnia az „Alt + F11” billentyűket.
3. Egyszerre bejut a „Microsoft Visual Basic for Applications” ablakba.
4. Ezt követően meg kell találnia és meg kell nyitnia egy nem használt modult.
5. Ezután bemásolhatja és beillesztheti a következő VBA-kódot ebbe a modulba.

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

Megjegyzések:

• Lehet, hogy több e-mail fiókot konfigurált az Outlookban. És mindegyiknek saját PST-fájlja van. Mindegyik fájlban létrehozhat néhány keresési mappát. A fenti kóddal az összes keresési mappa törlődik, függetlenül attól, hogy milyen fájlokban találhatók.
• Ha meg szeretne adni egy Outlook adatfájlt, a következő sort adhatja hozzá az „Minden objStore In objStores” részhez. Itt módosítsa a „John Smith” nevet a saját PST-fájlja megjelenített nevére.

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

6. Ezt követően állítsa alacsonyra az Outlook makró biztonsági szintjét.
7. Végül a „Microsoft Visual Basic for Applications” ablakban a makró futtatásához kattintson az F5 billentyű lenyomására.
8. A makró befejezése után látni fogja, hogy az Outlook összes keresési mappája törölve lett.

Védje Outlook adatait

Mivel az Outlook hajlamos a sérülésekre, nagy erőfeszítéseket kell tenni az Outlook-adatok védelme érdekében. Kétségtelen, hogy az egyik legfontosabb módszer az Outlook-fájlok rendszeres és naprakész biztonsági mentése. Továbbá, hogy azonnali mentést biztosítson egy esetleges hiba esetén Az Outlook korrupciója, jobb lenne, ha elkészítene egy meggyőző és jó hírű javítási eszközt, mint pl DataNumen Outlook Repair.

Szerző Bevezetés:

Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve SQL helyreállítása és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com