Nëse keni krijuar shumë shabllone përdoruesish në Outlook tuaj dhe tani dëshironi t'i fshini ato në grup, mund t'i referoheni këtij artikulli. Këtu do të ndajmë me ju 2 metoda të shpejta për ta arritur atë.
Outlook ju lejon të krijoni shabllone të ndryshëm përdoruesish, të cilët mund të përmirësojnë shumë efikasitetin tuaj. Ndoshta ju keni personalizuar dhe ruajtur disa shabllone në Outlook tuaj. Tani, nëse mendoni se ato nuk janë më të dobishme, mund të dëshironi t'i fshini ato. Më pas, ne do t'ju mësojmë 2 mënyra për t'i fshirë ato në masë. Tani lexoni për t'i marrë ato në detaje.
Metoda 1: Gjeni dhe fshini manualisht shabllonet e përdoruesve
- Për sitart, nisni Outlook.
- Më pas, krijoni një postë të re duke klikuar butonin "E-mail i ri".
- Tjetra, në dritaren e mesazhit të ri, klikoni "File" në këndin e sipërm të djathtë.
- Në menunë "File", klikoni "Ruaj si".

- Më pas, në kutinë e dialogut që shfaqet në "Ruaj si", zgjidhni "Modelin e Outlook" nga lista e fushës "Ruaj si lloj:".
- Menjëherë, dosja e paracaktuar për ruajtjen e shablloneve do të hapet në kutinë e dialogut aktual.
- Tani, kopjoni rrugën e dosjes.
- Pas kësaj, hapni Windows Explorer dhe ngjitni shtegun e dosjes në shiritin e adresave dhe shtypni "Enter".
- Më në fund, në dosjen e hapur, zgjidhni të gjitha shabllonet dhe shtypni butonin "Fshi" për t'i fshirë të gjitha.
Metoda 2: Fshij në grup modelet e përdoruesve me VBA
- Për të filluar, shkoni te redaktori VBA i Outlook përmes "Alt + F11".
- Në dritaren tjetër, kopjoni kodin e mëposhtëm VBA në një 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
- Së fundi, shtypni butonin "F5" për të ekzekutuar këtë makro.
- Kur makro të përfundojë, do të shfaqet një kërkesë, siç tregohet në figurën më poshtë.
- Tani, mund të kontrolloni dosjen për shabllonet e përdoruesve. Të gjithë shabllonet janë zhdukur.
Shmangni humbjen e pakëndshme të të dhënave të Outlook
Dihet që Outlook është i prekshëm. Me fjalë të tjera, Outlook nuk është i korruptuar rare. Prandaj, për të shmangur korrupsionin ose humbjen e të dhënave të Outlook, duhet të merrni masa të shumta paraprake. Për shembull, ju duhet të qëndroni për të rezervuar skedarin PST në baza të rregullta. Përveç kësaj, për të ofruar shpëtim të menjëhershëm, është më mirë të mbani një të fortë dhe të provuar mirë Riparimi i parashikimeve i dobishëm, si DataNumen Outlook Repair.
Hyrje e autorit:
Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë riparim SQL Server dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com






