Әдепкі бойынша, Outlook пайдаланушыларға барлық іздеу қалталарын жаппай жоюды айтпағанда, бір уақытта бірнеше іздеу қалтасын жоюға мүмкіндік бермейді. Бірақ бұл мақала сізге оны жүзеге асыратын әдіспен бөліседі.
Әдетте, іздеу қалтасын жою үшін, біреуін тінтуірдің оң жақ түймесімен шертіп, контекстік мәзірден «Қалтаны жою» опциясын таңдауға болады. Осылайша, барлық іздеу қалталарын жою қажет болғанда, сіз оны өте жалықтыратын және ауыр деп ойлайтын боласыз. Сіз олардың барлығын бір уақытта жоюды қалауыңыз керек. Осылайша, біз сізге жоюды тез арада орындауға көмектесетін құралды енгіземіз.
Барлық іздеу қалталарын пакеттік түрде жою
- Бастапқыда Outlook бағдарламасын әдеттегідей іске қосу керек.
- Outlook бағдарламасының негізгі экранына кіргеннен кейін «Alt + F11» пернелерін басу керек.
- Сіз бірден «Microsoft Visual Basic for Applications» терезесіне кіресіз.
- Кейіннен сіз қолданылмайтын модульді тауып, ашуыңыз керек.
- Содан кейін келесі модульге келесі VBA кодын көшіріп, қоюға болады.
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
Ескертулер:
- Мүмкін сіз Outlook бағдарламасында бірнеше электрондық пошта тіркелгілерін теңшеген боларсыз. Әрқайсысының жеке PST файлдары бар. Әр файлда бірнеше іздеу қалталарын жасауға болады. Жоғарыда көрсетілген код бойынша іздеу қалталары қай файлда орналасқанына қарамастан жойылады.
- Егер сіз Outlook деректер файлын көрсеткіңіз келсе, «ObjStore -дағы әрбір объект үшін» бөлімінің астына келесі жолды қосуға болады. Мұнда сіз «Джон Смитті» жеке PST файлыңыздың атауына өзгертуіңіз керек.
If objStore.DisplayName = "John Smith" Then . . . . . . . . . . . . . . . End If
- Осыдан кейін Outlook макроқауіпсіздік деңгейін төмен деңгейге өзгерту керек.
- Ақыр соңында, «Қолданбаларға арналған Microsoft Visual Basic» терезесінде осы макросты іске қосу үшін F5 пернесін басуға болады.
- Макросты аяқтағаннан кейін Outlook бағдарламасындағы барлық іздеу қалталары жойылғанын көресіз.
Outlook деректерін қорғаңыз
Outlook бағдарламасы бұзылуға бейім болғандықтан, Outlook деректерін жақсы қорғау үшін көп күш салуыңыз керек. Сөзсіз, ең маңызды тәсілдердің бірі - Outlook файлдарыңыздың сақтық көшірмесін үнемі және жаңартылып отыру. Сонымен қатар, егер жағдай туындаса, дереу құтқару үшін Сыбайлас жемқорлық көрінісі, сияқты сенімді және беделді түзету құралы дайындаған жөн, мысалы DataNumen Outlook Repair.
Автордың кіріспесі:
Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. қалпына келтіру кв және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com