Kuidas kiiresti kustutada mitu Outlooki meilikausta partiidena

Kahtlemata on Outlookis ühe kirjakausta kustutamine väga lihtne. Kuid kui soovite kustutada mitu meilikausta, on nende eraldi kustutamine üsna tülikas. Selles artiklis juhendame teid, kuidas neid partiidena kustutada.

Nagu tavaliselt, on ühe kirjakausta kustutamiseks saadaval kaks meetodit. Nagu on näidatud järgmisel ekraanipildil, võite paremklõpsata sellel meilikaustal ja seejärel valida selle kontekstimenüüst "Kustuta kaust". Teine on see, et peaksite lülituma vahekaardile "Kaust" ja klõpsama nuppu "Kustuta kaust".

Kustutage üks e-posti kaust

On ilmne, et mõlemad on üsna lihtsad. Kui aga kasutate kumbagi mitme kausta kustutamiseks, on see üsna tülikas. Paljud kasutajad on väljendanud soovi kustutada mitu kausta lihtsalt ühe korraga. Kui kõik need kaustad on konkreetse kausta all olevad alamkaustad, nagu ülaltoodud pildil, saate nende kustutamiseks ühe klõpsuga tõepoolest kasutada Outlook VBA-d. Aga kui ei, siis peate tegema täiendavaid jõupingutusi. Nende üksikasjalikuks saamiseks lugege edasi.

Kui need kaustad on konkreetse kausta alamkaustad

  1. Alustamiseks käivitage Outlook.
  2. Seejärel vajutage VBA redaktori avamiseks klahvikombinatsiooni Alt + F11.
  3. Järgmisena peaksite hüpikaknas avama mooduli, mida ei kasutata, või sisestama uue mooduli käsuga “Insert” > “Module”.
  4. Seejärel peate sellesse kopeerima järgmised koodid.
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

VBA koodid – kustutage kõik alamkaustad korraga

  1. Pärast seda saate praegusest aknast väljuda ja lisada kiirpääsu tööriistaribale uue makro.Lisage uus projekt kiirpääsu tööriistaribale
  2. Lõpuks saate proovida.
  • Esmalt valige põhikaust.
  • Seejärel klõpsake kiirjuurdepääsu tööriistaribal makronuppu.Kustutage kõik alamkaustad VBA kaudu
  • Kõik alamkaustad kustutatakse korraga.

Ülaltoodud trikk on märkimisväärselt mugav, kui need kaustad on kõik konkreetse kausta all olevad alamkaustad. Kui aga kustutatavad kaustad asuvad erinevate kaustade all, tuleb teha mõned lisatoimingud. Järgige alltoodud samme.

Kui need kaustad ei ole konkreetse kausta alamkaustad

  1. Alustuseks looge uus kaust nimega "Temp".
  • Esiteks sisestage õige PST-fail.
  • Seejärel klõpsake vahekaardil "Kaust" nuppu "Uus kaust".
  • Järgmisena tippige väljale "Nimi" "Temp".
  • Lõpuks klõpsake nuppu "OK".Looge uus ajutine kaust
  1. Seejärel peate lohistama kaustad, mida kavatsete kustutada, kausta "Temp".Lohistage kustutatavad kaustad Temp-kausta
  2. Kui kõik need kaustad on teisaldatud ja asuvad kaustas "Temp", saate kõigi nende alamkaustade kustutamiseks jaotises "Temp" kasutada esimeses jaotises mainitud makrot.

Ärge kunagi klõpsake tundmatute meilide linke

Peale oma makrode peaksite olema ettevaatlik kõigi väliste makrode suhtes, kuna need võivad sisaldada viirusi. Nagu tavaliselt, on need pahatahtlikud makrod e-kirjades varjatud kahjutute linkidena. Seega, kui te ei suuda meili saatjat tuvastada, ärge laadige selle manuseid alla ega klõpsake selle linke. Vastasel juhul võivad teie Outlooki andmed tõenäoliselt nakatuda. Seeläbi oma rikutud Outlook sisendkausta tööriist Scanpst.exe ei aita. Peate kasutama välist tööriista, näiteks DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas remont sql ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.