Para sa ilang mga layunin, gusto mong simulan ang paggamit ng mga kategorya ng kulay mula sa simula sa iyong Outlook. Samakatuwid, gusto mong linisin ang lahat ng mga kategorya ng kulay sa lahat ng mga item sa Outlook. Sa artikulong ito, ipapakilala namin ang isang mahusay na paraan upang makuha ito.
Halimbawa, upang muling buuin ang mga kategorya ng kulay, tatanggalin mo ang lahat ng umiiral na mga kategorya ng kulay sa iyong Outlook. Ngunit, pagkatapos ng pagtanggal, maaari mong makita na ang mga kategoryang ito ay naka-attach pa rin sa mga item sa Outlook. Ang tanging pagbabago ay ang mga kategorya ay nawawala ang kanilang mga orihinal na kulay, na ipinapakita sa puti. Sa ilalim ng sitwasyong ito, maaari kang umasa na i-clear ang lahat ng kategorya ng kulay sa lahat ng item.

Upang gawin ito para sa lahat ng mga item sa isang folder, maaari mo lamang pindutin ang "Ctrl + A" upang piliin ang lahat ng mga item, i-right click at piliin ang "Kategorya" at "I-clear ang Lahat ng Mga Kategorya" mula sa menu ng konteksto. Ngunit, sa ganitong paraan, kailangan mong iproseso ang bawat folder nang paisa-isa. Ito ay masyadong nakakapagod. Kaya, sa mga sumusunod, ituturo namin sa iyo ang isang mas maginhawang paraan.
Batch I-clear ang Lahat ng Mga Kategorya ng Kulay sa Lahat ng Mga Item sa Outlook
- Para sa panimula, ilunsad ang application ng Outlook.
- Pagkatapos, pindutin ang “Alt + F11” key shortcut para ma-trigger ang VBA editor.
- Sa pagpapakita ng bagong window, kopyahin at i-paste ang sumusunod na VBA code sa isang walang laman na module o proyekto.
Sub BatchClearAllColorCategories_AllOutlookItems()
Dim objOutlookFile As Outlook.Folder
Dim objFolder As Outlook.Folder
'Change "John Smith" to your own Outlook file's display name
Set objOutlookFile = Outlook.Application.Session.Folders("John Smith")
For Each objFolder In objOutlookFile.Folders
Call ProcessFolders(objFolder)
Next
MsgBox "Completed!", vbInformation + vbOKOnly
End Sub
Sub ProcessFolders(ByVal objCurrentFolder As Outlook.Folder)
Dim objItems As Outlook.Items
Dim objSubfolder As Outlook.Folder
If objCurrentFolder.Items.Count > 0 Then
For Each objItem In objCurrentFolder.Items
'Clear all color categories from an item
If Len(objItem.Categories) <> 0 Then
objItem.Categories = ""
objItem.Save
End If
Next
End If
'Process all subfolders recursively
If objCurrentFolder.Folders.Count > 0 Then
For Each objSubfolder In objCurrentFolder.Folders
Call ProcessFolders(objSubfolder)
Next
End If
End Sub
- Pagkatapos noon, ilagay ang cursor sa unang subroutine at pagkatapos ay pindutin ang "F5" key na button upang ma-trigger ang macro.
- Kapag nakuha mo ang "Nakumpleto" na prompt, nangangahulugan ito na ang lahat ng mga kategorya ng kulay ay na-clear na mula sa lahat ng mga item sa Outlook.
- Sa kasalukuyan, Kahit na ang mga email, appointment, gawain, contact o tala sa iyong Outlook, lahat ng mga ito ay dapat na walang mga kategorya ng kulay na itinalaga.
Lutasin ang mga Seryosong Problema sa Outlook
Marahil ay alam mo na ang Outlook ay na-preinstall nang may built-in na tool sa pag-aayos – Scanpst.exe. Nasubukan mo na ba ito dati? Upang maging tapat, ito ay sapat na makapangyarihan upang harapin ang maliliit na problema na kinasasangkutan ng iyong Outlook PST file. Gayunpaman, kung ang isyu ay lubhang malubha, tulad ng masama nasira ang Outlook file, ang panloob na utility ay hindi gagawa ng mga epekto. Sa sitwasyong ito, kailangan mong bumalik sa isang tip-top na panlabas na tool, tulad ng DataNumen Outlook Repair, na umako sa mga karibal nito dahil sa mataas na pagbawi nito sa PST.
Panimula ng May-akda:
Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang SQL Server ayusin at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa


