Özel Takvim Öğelerini Outlook'unuzda Belirli Bir Renkte Otomatik Olarak Göstermenin 2 Yöntemi

Takvimde özel ve genel öğeleri daha kolay ayırt etmek için, özel öğeleri belirli bir renkte, örneğin kırmızıyla vurgulayarak otomatik olarak göstermeyi tercih edebilirsiniz. Bu yazıda bunu gerçekleştirmenin 2 yolunu tanıtacağız.

Birçok kullanıcı, takvim öğelerini özel olup olmadıklarına göre sınıflandırmayı tercih eder. Takvimde, özel öğelerin varsayılan olarak görüntüde belirgin farklılıkları olmadığından, özel öğeleri çok daha kolay tanımlamak için Outlook'un bunları otomatik olarak belirli bir renkte göstermesine izin verebilirsiniz. Burada size bunu elde etmek için 2 yaklaşım öğreteceğiz.

Yöntem 1: "Koşullu Biçimlendirme" kullanın

1. Öncelikle Outlook'u açın ve "Takvim" bölmesine erişin.
2. Ardından, “Görünüm” sekmesine dönün ve görünümü “Takvim” olarak değiştirin.
3. Ardından, “Ayarları Görüntüle” düğmesine basın.
4. Açılan iletişim kutusunda, "Koşullu Biçimlendirme" seçeneğini tıklayın.
5. Daha sonra, bir sonraki iletişim kutusunda "Ekle" yi tıklayın ve "Özel" gibi bir ad girin.
6. Ardından, örneğim için "Koyu Kırmızı" gibi belirli bir renk seçin.
7. Bundan sonra, "Koşul" düğmesini tıklayın.
8. Bir sonraki iletişim kutusunda "Gelişmiş" sekmesine geçin ve aşağıdaki filtreyi ekleyin:

Sensitivity > equals > private

9. Son olarak, bu biçimlendirme kuralını kaydetmek için “Listeye Ekle” ve birkaç “Tamam” düğmesine tıklayın.
10. Bundan sonra, tüm özel takvim öğeleri "Koyu Kırmızı" renkte gösterilecektir.

Yöntem 2: VBA'da “Otomatik Renk Kategorizasyonu” kullanın

1. Öncelikle, belirli bir renkle "Özel" adlı yeni bir renk kategorisi oluşturun.
2. Ardından, Outlook VBA düzenleyicisini “ göre başlatın.Outlook'unuzda VBA Kodunu Nasıl Çalıştırırsınız?".
3. Daha sonra “ThisOutlookSession” projesine aşağıdaki kodu ekleyin.

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. Son olarak, bu makroyu etkinleştirmek için Outlook'u yeniden başlatın.
5. Şimdi, bir deneyebilirsin.

• Varsayılan takvimde bir öğeyle ilgili satış konuşması yapın.
• Ardından, "Özel" olarak değiştirin.
• Hemen, aşağıdaki ekran görüntüsünde gösterildiği gibi, bu öğeye "Özel" renk kategorisi atanacaktır.

Değerli Outlook Verilerinizi Kurtarın

Outlook savunmasız olduğundan, birçok kullanıcı PST bozulmasına maruz kalmıştır. Genel olarak, onunla karşılaştığınızda, önce şunu deneyebilirsiniz: gelen kutusu onarım aracı dosyayı düzeltmek için. Yine de başarısız olursa, daha güçlü ve güvenilir bir harici yardımcı programa başvurabilirsiniz. DataNumen Outlook Repair.

Yazar Tanıtımı:

Shirley Zhang, bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. sql bozulması ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com