2 Methoden zum automatischen Anzeigen privater Kalenderelemente in einer bestimmten Farbe in Ihrem Outlook

Um private und öffentliche Termine im Kalender besser unterscheiden zu können, können Sie private Termine automatisch in einer bestimmten Farbe, beispielsweise rot, hervorheben. Dieser Beitrag stellt Ihnen zwei Möglichkeiten vor, dies umzusetzen.

Viele Benutzer bevorzugen es, Kalenderelemente danach zu klassifizieren, ob sie privat sind oder nicht. Da private Elemente im Kalender standardmäßig keine offensichtlichen Unterschiede in der Sicht aufweisen, können Sie Outlook automatisch in einer bestimmten Farbe anzeigen lassen, um private Elemente viel einfacher identifizieren zu können. Hier werden wir Ihnen 2 Ansätze beibringen, um es zu bekommen.

Methode 1: Verwenden Sie "Bedingte Formatierung"

1. Starten Sie zunächst Outlook und öffnen Sie den Bereich „Kalender“.
2. Wechseln Sie dann zur Registerkarte "Ansicht" und ändern Sie die Ansicht in "Kalender".
3. Klicken Sie anschließend auf die Schaltfläche "Einstellungen anzeigen".
4. Klicken Sie im Popup-Dialogfeld auf "Bedingte Formatierung".
5. Klicken Sie später im nachfolgenden Dialogfeld auf "Hinzufügen" und geben Sie einen Namen wie "Privat" ein.
6. Wählen Sie dann eine bestimmte Farbe aus, z. B. „Dunkelrot“ für meine Instanz.
7. Klicken Sie danach auf die Schaltfläche "Bedingung".
8. Wechseln Sie im nächsten Dialogfeld zur Registerkarte "Erweitert" und fügen Sie den folgenden Filter hinzu:

Sensitivity > equals > private

9. Klicken Sie abschließend auf "Zur Liste hinzufügen" und dann auf "OK", um diese Formatierungsregel zu speichern.
10. Ab sofort werden alle privaten Kalendereinträge in „Dunkelrot“ angezeigt.

Methode 2: Verwenden Sie in VBA "Auto Color Categorize"

1. Erstellen Sie zunächst eine neue Farbkategorie mit dem Namen "Privat" mit einer bestimmten Farbe.
2. Starten Sie anschließend den Outlook VBA-Editor gemäß „So führen Sie VBA-Code in Outlook aus".
3. Fügen Sie dann den folgenden Code in das Projekt "ThisOutlookSession" ein.

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

4. Starten Sie Outlook schließlich neu, um dieses Makro zu aktivieren.
5. Jetzt können Sie es versuchen.

• Pitch auf einem Element im Standardkalender.
• Ändern Sie es dann in "Privat".
• Sofort wird diesem Element die Farbkategorie "Privat" zugewiesen, wie im folgenden Screenshot gezeigt.

Retten Sie Ihre wertvollen Outlook-Daten

Da Outlook anfällig ist, waren viele Benutzer jemals einer PST-Beschädigung ausgesetzt. Wenn Sie darauf stoßen, können Sie im Allgemeinen zuerst das ausprobieren Reparaturwerkzeug für den Posteingang um die Datei zu reparieren. Wenn dies jedoch fehlschlägt, können Sie auf ein leistungsfähigeres und zuverlässigeres externes Dienstprogramm zurückgreifen, z DataNumen Outlook Repair.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich SQL-Korruption und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX