Podrazumevano, Outlook ne dozvoljava korisnicima da izbrišu više od jedne fascikle za pretragu u jednom potezu, a da ne spominjemo grupno brisanje svih fascikli za pretragu. Ali ovaj članak će vam podijeliti metodu koja to može realizirati.
Općenito, da biste izbrisali mapu za pretraživanje, možete kliknuti desnim tasterom miša na jednu i izabrati opciju „Izbriši fasciklu“ iz kontekstnog menija. Na ovaj način, kada trebate da izbrišete sve svoje fascikle za pretragu, sigurno ćete misliti da je to prilično zamorno i glomazno. Mora da želite da ih sve izbrišete odjednom. Stoga ćemo vam ovdje predstaviti sredstvo koje vam može pomoći da izvršite brisanje u trenu.

Grupno brisanje svih foldera za pretragu
- Na samom početku, trebalo bi da pokrenete svoj Outlook kao i obično.
- Zatim, nakon što pristupite glavnom Outlook ekranu, morate pritisnuti tipke “Alt + F11”.
- Odmah ćete ući u prozor „Microsoft Visual Basic za aplikacije“.
- Nakon toga, morate pronaći i otvoriti modul koji nije u upotrebi.
- Zatim možete kopirati i zalijepiti sljedeći VBA kod u ovaj modul.
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
Napomene:
- Možda ste konfigurisali nekoliko naloga e-pošte u svom Outlooku. I svaki od njih ima svoje PST datoteke. U svakoj datoteci možete kreirati neke fascikle za pretragu. Gornjim kodom, svi folderi za pretragu će biti izbrisani, bez obzira u kojim fajlovima se nalaze.
- Ako želite da navedete Outlook datoteku sa podacima, možete dodati sledeći red pod „Za svaki objStore u objStores“. Ovdje biste trebali promijeniti “John Smith” u naziv za prikaz vaše vlastite PST datoteke.
If objStore.DisplayName = "John Smith" Then . . . . . . . . . . . . . . . End If
- Nakon toga, trebali biste promijeniti nivo sigurnosti Outlook makroa na niski.
- Na kraju, u prozoru „Microsoft Visual Basic za aplikacije“, da biste pokrenuli ovaj makro, možete kliknuti na dugme F5.
- Nakon što makronaredba završi, videćete da su sve fascikle za pretragu u vašem Outlooku izbrisane.
Zaštitite svoje Outlook podatke
Zbog činjenice da je Outlook sklon oštećenjima, trebali biste uložiti velike napore kako biste dobro zaštitili Outlook podatke. Nesumnjivo, jedan od najvažnijih načina je dosljedno i ažurno pravljenje sigurnosnih kopija vaših Outlook datoteka. Nadalje, kako biste ponudili trenutno spašavanje u slučaju... Outlook korupcija, bolje je da pripremite uvjerljiv i renomiran alat za popravku, kao što je DataNumen Outlook Repair.
Uvod za autora:
Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući oporaviti sql i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com
