Outlook-da bütün istifadəçi şablonlarını toplu silməyin 2 sürətli yolu

Outlook-da çoxlu istifadəçi şablonları yaratmısınızsa və indi onları toplu silmək istəyirsinizsə, bu məqaləyə müraciət edə bilərsiniz. Burada buna nail olmaq üçün 2 sürətli üsulu sizinlə paylaşacağıq.

Outlook sizə müxtəlif istifadəçi şablonları yaratmağa imkan verir ki, bu da səmərəliliyinizi əhəmiyyətli dərəcədə artıra bilər. Yəqin ki, Outlook-da birdən çox şablonu fərdiləşdirib saxlamısınız. İndi onların daha faydalı olmadığını düşünürsünüzsə, onları silmək istəyə bilərsiniz. Bundan sonra, onları toplu şəkildə silmək üçün sizə 2 yanaşma öyrədəcəyik. İndi onları ətraflı öyrənmək üçün oxuyun.

Metod 1: İstifadəçi şablonlarını tapın və əl ilə silin

1. Başlamaq üçün Outlook-u işə salın.
2. Sonra "Yeni E-poçt" düyməsini klikləməklə yeni poçt yaradın.
3. Sonra, yeni mesaj pəncərəsində yuxarı sağ küncdəki "Fayl" düyməsini basın.
4. "Fayl" menyusunda "Farklı Saxla" düyməsini basın.
5. Sonra, “Farklı Saxla” pəncərəsinin açılan informasiya qutusunda “Farklı Saxla:” sahəsinin siyahısından “Outlook Şablonu”nu seçin.
6. Bir anda, cari dialoq qutusunda şablonları saxlamaq üçün standart qovluq açılacaqdır.
7. İndi qovluq yolunu kopyalayın.
8. Bundan sonra, Windows Explorer-i açın və qovluq yolunu ünvan çubuğuna yapışdırın və "Enter" düyməsini basın.
9. Nəhayət, açılmış qovluqda bütün şablonları seçin və hamısını silmək üçün “Sil” düyməsini sıxın.

Metod 2: İstifadəçi Şablonlarını VBA ilə Toplu Silin

1. Başlamaq üçün "Alt + F11" vasitəsilə Outlook VBA redaktoruna keçin.
2. Növbəti pəncərədə aşağıdakı VBA kodunu modula köçürün.

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. Nəhayət, bu makronu işə salmaq üçün “F5” düyməsini sıxın.
4. Makro tamamlandıqda, aşağıdakı şəkildə göstərildiyi kimi bir sorğu göstərilir.
5. İndi istifadəçi şablonları üçün qovluğu yoxlaya bilərsiniz. Bütün şablonlar getdi.

Xoşagəlməz Outlook məlumat itkisindən çəkinin

Outlook-un həssas olduğu məlumdur. Başqa sözlə, Outlook-un korlanması nadir hal deyil. Buna görə də, Outlook məlumatlarının korlanmasından və ya itkisindən qaçınmaq üçün bir sıra tədbirlər görməlisiniz. Məsələn, PST faylının ehtiyat nüsxəsini müntəzəm olaraq çıxarmalısınız. Bundan əlavə, dərhal xilasetmə təmin etmək üçün etibarlı və yaxşı sübut olunmuş bir fayl saxlamalısınız. Outlook təmiri kimi faydalıdır DataNumen Outlook Repair.

Müəllif Giriş:

Shirley Zhang məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc təmir SQL Server və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com