Егер сіз Outlook бағдарламасында көптеген қолданушы үлгілерін жасаған болсаңыз және оларды пакеттік түрде жойғыңыз келсе, онда сіз осы мақалаға сілтеме жасай аласыз. Мұнда біз сіздерге оған жетудің 2 жылдам әдісін бөлісеміз.
Outlook әр түрлі қолданушы шаблондарын жасауға мүмкіндік береді, бұл сіздің тиімділігіңізді едәуір арттыра алады. Мүмкін сіз бірнеше шаблондарды Outlook бағдарламасында реттеп, сақтаған боларсыз. Енді олар енді пайдалы емес деп ойласаңыз, оларды жойғыңыз келуі мүмкін. Одан кейін біз оларды жаппай жоюдың 2 тәсілін үйретеміз. Енді оларды егжей-тегжейлі алу үшін оқыңыз.
1-әдіс: Пайдаланушы шаблондарын табу және қолмен жою
- Бастау үшін Outlook бағдарламасын іске қосыңыз.
- Содан кейін, «Жаңа электрондық пошта» батырмасын басу арқылы жаңа пошта жасаңыз.
- Содан кейін, хабардың жаңа терезесінде жоғарғы оң жақ бұрыштағы «Файл» батырмасын басыңыз.
- «Файл» мәзірінде «Басқаша сақтау» батырмасын басыңыз.

- Содан кейін, «Басқаша сақтау» терезесінің қалқымалы терезесінде «Түр ретінде сақтау:» өрісінің тізімінен «Outlook шаблонын» таңдаңыз.
- Бір уақытта ағымдағы диалог терезесінде шаблондарды сақтауға арналған әдепкі қалта ашылады.
- Енді, қалта жолын көшіріңіз.
- Осыдан кейін, Windows Explorer-ді ашып, қалта жолын мекен-жай жолына қойып, «Enter» пернесін басыңыз.
- Соңында, ашылған қалтада барлық шаблондарды таңдап, барлығын жою үшін «Жою» пернесін басыңыз.
2-әдіс: VBA көмегімен қолданушы шаблондарын пакеттік түрде жою
- Бастау үшін «Alt + F11» арқылы Outlook VBA редакторына өтіңіз.
- Келесі терезеде келесі VBA кодын модульге көшіріңіз.
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
- Соңында осы макросты іске қосу үшін «F5» батырмасын басыңыз.
- Макро аяқталғаннан кейін, төмендегі суретте көрсетілгендей шақыру пайда болады.
- Енді сіз қалтаны пайдаланушы шаблондары үшін тексере аласыз. Барлық шаблондар жойылды.
Деректердің жағымсыз жоғалуынан аулақ болыңыз
Outlook бағдарламасының осал екені белгілі. Басқаша айтқанда, Outlook бағдарламасының бұзылуы сирек емес. Сондықтан, Outlook деректерінің бұзылуынан немесе жоғалуынан аулақ болу үшін бірнеше сақтық шараларын қолдану керек. Мысалы, PST файлының сақтық көшірмесін үнемі жасау керек. Сонымен қатар, жедел қалпына келтіруді қамтамасыз ету үшін сенімді және жақсы дәлелденген нұсқаны сақтаған жөн. Перспективаны жөндеу пайдалы, сияқты DataNumen Outlook Repair.
Автордың кіріспесі:
Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. жөндеу SQL Server және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com






