2 brza načina za grupno brisanje svih korisničkih predložaka u vašem Outlooku

Ako ste stvorili mnogo korisničkih predložaka u svom Outlooku i sada ih želite grupno izbrisati, možete pogledati ovaj članak. Ovdje ćemo s vama podijeliti 2 brze metode kako to postići.

Outlook vam omogućuje izradu različitih korisničkih predložaka, koji mogu znatno poboljšati vašu učinkovitost. Možda ste prilagodili i pohranili više predložaka u svom Outlooku. Sada, ako mislite da više nisu korisni, možete ih izbrisati. Nakon toga ćemo vas naučiti 2 pristupa za skupno brisanje. Sada čitajte kako biste ih detaljno upoznali.

Metoda 1: Pronađite i ručno izbrišite korisničke predloške

1. Za početak, pokrenite Outlook.
2. Zatim kreirajte novu e-poštu klikom na gumb "Nova e-pošta".
3. Zatim u novom prozoru s porukom kliknite "Datoteka" u desnom gornjem kutu.
4. U izborniku "Datoteka" kliknite "Spremi kao".
5. Nakon toga, u skočnom dijaloškom okviru "Spremi kao", odaberite "Outlook predložak" s popisa polja "Spremi kao vrstu:".
6. Odjednom će se otvoriti zadana mapa za spremanje predložaka u trenutnom dijaloškom okviru.
7. Sada kopirajte putanju mape.
8. Nakon toga otvorite Windows Explorer i zalijepite put mape u adresnu traku i pritisnite “Enter”.
9. Na kraju, u otvorenoj mapi odaberite sve predloške i pritisnite tipku “Delete” za brisanje svih.

Metoda 2: Skupno brisanje korisničkih predložaka pomoću VBA

1. Za početak idite na Outlook VBA editor preko “Alt + F11”.
2. U sljedećem prozoru kopirajte sljedeći VBA kod u modul.

Sub DeleteAllUserTemplates()
    Dim strEnviro As String
    Dim strTemplateFolder As String
    Dim objFileSystem As Object
    Dim objFolder As Object
    Dim objFile As Object
    Dim strFileExtension As String
 
    'Get the local folder storing Stationery files
    strEnviro = CStr(Environ("USERPROFILE"))
    strTemplateFolder = strEnviro & "\Documents\UserTemplates"
 
    Set objFileSystem = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFileSystem.GetFolder(strTemplateFolder)

    'Delete all oft files in the folder
    For Each objFile In objFolder.Files
        strFileExtension = objFileSystem.GetExtensionName(objFile)
        If strFileExtension = "oft" Then
           objFileSystem.DeleteFile (objFile.Path)
        End If
    Next
 
    'Get a prompt
    MsgBox "All user templates have been deleted!", vbInformation + vbOKOnly
End Sub

3. Na kraju, pritisnite tipku "F5" za pokretanje ove makronaredbe.
4. Kada se makronaredba završi, prikazat će se upit, kao što je prikazano na slici ispod.
5. Sada možete provjeriti mapu za korisničke predloške. Svi predlošci su nestali.

Klonite se neugodnog gubitka podataka u programu Outlook

Poznato je da je Outlook ranjiv. Drugim riječima, oštećenje Outlooka nije rijetkost. Stoga, kako biste izbjegli oštećenje ili gubitak podataka u Outlooku, trebali biste poduzeti više mjera opreza. Na primjer, morate redovito izrađivati ​​sigurnosne kopije PST datoteke. Osim toga, kako biste osigurali trenutno spašavanje, bolje je da imate robusnu i provjerenu sigurnosnu kopiju. Outlook popravak uslužni program zgodan, poput DataNumen Outlook Repair.

Uvod za autora:

Shirley Zhang stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popravak SQL Server i softverske proizvode za popravak Outlooka. Za više informacija posjetite www.datanumen.com