2 meetodit privaatsete kalendriüksuste automaatseks kuvamiseks oma Outlookis kindlas värvitoonis

Outlooki lahendused September 29, 2025

Privaatsete ja mitteprivaatsete üksuste kalendris eristamiseks võiksite privaatseid üksusi automaatselt teatud värviga kuvada, näiteks punasega, et need esile tõsta. See postitus tutvustab kahte võimalust selle realiseerimiseks.

Paljud kasutajad eelistavad liigitada kalendriüksusi selle järgi, kas need on privaatsed või mitte. Kuna kalendris ei ole privaatsetel üksustel vaikimisi nähtavaid erinevusi, nii et privaatseid üksusi oleks palju lihtsam tuvastada, saate lasta Outlookil neid automaatselt teatud värviga kuvada. Siin õpetame teile selle saamiseks 2 lähenemisviisi.

1. meetod: kasutage tingimusvormingut

  1. Alustamiseks avage Outlook ja minge vahekaardile „Kalender”.
  2. Seejärel minge vahekaardile "Vaade" ja muutke vaateks "Kalender".Vaata kalendrit
  3. Järgmisena klõpsake nuppu "Kuva seaded".
  4. Hüpikdialoogiboksis klõpsake "Tingimuslik vormindamine".Tingimuslik vormindamine
  5. Hiljem klõpsake järgmises dialoogis "Lisa" ja sisestage nimi, näiteks "Privaatne".
  6. Seejärel valige minu näite jaoks konkreetne värv, näiteks "Tumepunane".Valige tingimusliku vormindamise värv
  7. Pärast seda klõpsake nuppu "Tingimus".
  8. Järgmises dialoogiboksis minge vahekaardile "Täpsemalt" ja lisage järgmine filter.
Sensitivity > equals > private

Määra Tingimusliku vormingu värvifilter

  1. Lõpuks klõpsake selle vormindamise reegli salvestamiseks nuppu "Lisa loendisse" ja mitut "OK".
  2. Nüüdsest kuvatakse kõik privaatsed kalendrikirjed “tumepunasena”.Privaatsed esemed tumedas värvitoonis

2. meetod: kasutage VBA-s valikut „Automaatne värvide kategoriseerimine”.

  1. Kõigepealt looge konkreetse värviga uus värvikategooria nimega "Privaatne".
  2. Järgmisena käivitage Outlook VBA redaktor vastavalt "Kuidas Outlookis VBA-koodi käivitada".
  3. Seejärel sisestage projekti "ThisOutlookSession" järgmine kood.
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

VBA kood – privaatkalendri üksuste automaatne kuvamine kindlas värvitoonis

  1. Lõpuks taaskäivitage Outlook selle makro aktiveerimiseks.
  2. Nüüd saate proovida.
  • Määrake vaikekalendris olevale üksusele.
  • Seejärel muutke see "Privaatseks".Muutke kalendriüksus privaatseks
  • Sellele üksusele määratakse kohe privaatne värvikategooria, nagu on näidatud järgmisel ekraanipildil.Automaatselt määratud "Privaatne" värvikategooria

Päästke oma väärtuslikud Outlooki andmed

Kuna Outlook on haavatav, on paljud kasutajad kunagi olnud PST korruptsiooni all. Üldiselt võite sellega kokku puutudes esmalt proovida postkasti parandamise tööriist faili parandamiseks. Kuid kui see ebaõnnestub, võite kasutada võimsamat ja usaldusväärsemat välist utiliiti, näiteks DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas sql korruptsioon ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.