Para mas madaling mapag-iba ang mga pribadong aytem at mga hindi pribadong aytem sa kalendaryo, maaari mong awtomatikong ipakita ang mga pribadong aytem sa isang partikular na kulay, tulad ng pula para i-highlight ang mga ito. Ipapakilala ng post na ito ang 2 paraan para maisakatuparan ito.
Mas gusto ng maraming mga gumagamit na uriin ang mga item sa kalendaryo batay sa kung pribado sila o hindi. Dahil, sa kalendaryo, ang mga pribadong item ay walang maliwanag na pagkakaiba sa paningin bilang default, upang mas madaling makilala ang mga pribadong item, maaari mong hayaan ang Auto na ipakita ang mga ito sa isang tukoy na kulay. Dito ay tuturuan namin kayo ng 2 diskarte upang makuha ito.
Paraan 1: Gumamit ng "Conditional Formatting"
- Para sa panimula, ilunsad ang Outlook at pumunta sa "Calendar" pane.
- Pagkatapos, lumiko sa tab na "View" at baguhin ang view sa "Kalendaryo".

- Susunod, pindutin ang pindutang "Tingnan ang Mga Setting".
- Sa popup dialog box, i-click ang "Conditional Formatting".
- Sa paglaon, sa kasunod na diyalogo, i-click ang "Magdagdag" at maglagay ng isang pangalan, tulad ng "Pribado".
- Pagkatapos, pumili ng isang tukoy na kulay, tulad ng "Madilim na Pula" para sa aking halimbawa.
- Pagkatapos nito, i-click ang pindutang "Kalagayan".
- Sa susunod na kahon ng dayalogo, lumipat sa tab na "Advanced" at idagdag ang sumusunod na filter:
Sensitivity > equals > private
- Panghuli, i-click ang "Idagdag sa Listahan" at maraming "OK" upang mai-save ang panuntunang ito sa pag-format.
- Mula ngayon, ang lahat ng mga pribadong item sa kalendaryo ay ipapakita sa "Madilim na Pula".
Paraan 2: Gumamit ng "Auto Color Category" sa VBA
- Una, lumikha ng isang bagong kategorya ng kulay na tinatawag na "Pribado" na may isang tukoy na kulay.
- Susunod, ilunsad ang editor ng VBA ng Outlook alinsunod sa “Paano Patakbuhin ang VBA Code sa Iyong Outlook".
- Pagkatapos, ilagay ang sumusunod na code sa proyekto na "ThisOutlookSession".
Private WithEvents objCalendarItems As Outlook.Items
Private Sub Application_Startup()
Set objCalendarItems = Outlook.Application.Session.GetDefaultFolder(olFolderCalendar).Items
End Sub
Private Sub objCalendarItems_ItemAdd(ByVal Item As Object)
Dim objCalendarItem As Outlook.AppointmentItem
Set objCalendarItem = Item
If objCalendarItem.Sensitivity = olPrivate Then
objCalendarItem.Categories = "Private"
Else
Call RemovePrivateCategory(objCalendarItem, "Private")
End If
objCalendarItem.Save
End Sub
Private Sub objCalendarItems_ItemChange(ByVal Item As Object)
Dim objCalendarItem As Outlook.AppointmentItem
Set objCalendarItem = Item
If objCalendarItem.Sensitivity = olPrivate Then
objCalendarItem.Categories = "Private"
Else
Call RemovePrivateCategory(objCalendarItem, "Private")
End If
objCalendarItem.Save
End Sub
Sub RemovePrivateCategory(ByVal objCurrentItem As Object, ByRef strCategory As String)
Dim varCategories As Variant
Dim i As Long
varCategories = Split(objCurrentItem.Categories, ",")
If UBound(varCategories) >= 0 Then
For i = 0 To UBound(varCategories)
If Trim(varCategories(i)) = strCategory Then
varCategories(i) = ""
objCurrentItem.Categories = Join(varCategories, ",")
Exit Sub
End If
Next
End If
End Sub
- Kalaunan, i-restart ang Outlook upang maisaaktibo ang macro na ito.
- Ngayon, maaari kang magkaroon ng isang pagsubok.
- I-pitch ang isang item sa default na kalendaryo.
- Pagkatapos, baguhin ito sa "Pribado".
- Kaagad, ang kategorya ng kulay na "Pribado" ay itatalaga sa item na ito, tulad ng ipinakita sa sumusunod na screenshot.
I-save ang Iyong Mahahalagang Data ng Outlook
Dahil mahina ang Outlook, maraming mga gumagamit ang napapailalim sa katiwalian sa PST. Sa pangkalahatan, kapag nakatagpo nito, maaari mo munang subukan ang tool sa pag-aayos ng inbox upang ayusin ang file. Gayunpaman, kung nabigo ito, maaari kang gumamit ng isang mas malakas at maaasahang panlabas na utility, tulad ng DataNumen Outlook Repair.
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 katiwalian at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa






