Хувийн хуанлийн зүйлийг таны төлөв байдалд тодорхой өнгөөр ​​автоматаар харуулах 2 арга

Хуанли дээрх хувийн болон хувийн бус зүйлсийг илүү хялбар ялгахын тулд та хувийн зүйлсийг тодруулахын тулд улаан гэх мэт тодорхой өнгөөр ​​автоматаар харуулахыг хүсч болно. Энэ нийтлэлд үүнийг хэрэгжүүлэх 2 аргыг танилцуулах болно.

Олон хэрэглэгчид хуанлийн зүйлийг хувийн шинж чанартай эсэхээс үл хамааран ангилахыг илүүд үздэг. Хуанли дээр хувийн зүйлүүд нь анхдагч байдлаар алсын хараатай байдаггүй тул хувийн зүйлсийг илүү хялбар тодорхойлохын тулд Outlook програмыг тодорхой өнгөөр ​​харуулах боломжийг олгодог. Үүнийг олж авахын тулд бид танд 2 аргыг зааж өгөх болно.

Арга 1: "Нөхцөлт формат" ашиглах

1. Эхлээд Outlook-г ажиллуулаад "Хуанли" цэс рүү орно уу.
2. Дараа нь "Харах" таб руу шилжиж, "Хуанли" болгож харагдацыг өөрчилнө үү.
3. Дараа нь "Тохиргоог харах" товчийг дарна уу.
4. Попап харилцах цонхонд “Нөхцөлт хэлбэршилт” дээр дарна уу.
5. Дараа нь дараагийн харилцах цонхонд "Нэмэх" дээр дарж "Хувийн" гэх мэт нэр оруулна уу.
6. Дараа нь миний жишээнд зориулж "Dark Red" гэх мэт тодорхой өнгө сонгоно уу.
7. Үүний дараа "Нөхцөл байдал" товчийг дарна уу.
8. Дараагийн харилцах цонхонд "Нарийвчилсан" таб руу шилжиж дараахь шүүлтүүрийг нэмнэ үү.

Sensitivity > equals > private

9. Эцэст нь энэхүү жагсаалтын дүрмийг хадгалахын тулд "Жагсаалтад нэмэх" болон хэд хэдэн "ОК" дээр дарна уу.
10. Одооноос эхлэн хувийн хуанлийн бүх зүйлийг "Хар улаан" өнгөөр ​​харуулах болно.

Арга 2: VBA-д "Автомат өнгө ангилах" -ыг ашиглана уу

1. Нэгдүгээрт, "Хувийн" нэртэй шинэ өнгө төрлийг тодорхой өнгөөр ​​үүсгээрэй.
2. Дараа нь Outlook VBA редакторыг “Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ".
3. Дараа нь дараахь кодыг “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

4. Эцэст нь энэ макрог идэвхжүүлэхийн тулд Outlook-г дахин эхлүүлнэ үү.
5. Одоо та туршаад үзээрэй.

• Анхдагч хуанли дахь зүйлийг сонгоно уу.
• Дараа нь үүнийг "Хувийн" болгож өөрчил.
• Дараахь дэлгэцийн агшинд харуулсны дагуу энэ зүйлд нэгэн зэрэг “Хувийн” өнгөний ангиллыг хуваарилах болно.

Таны үнэ цэнэтэй Outlook өгөгдлийг аврах

Outlook нь эмзэг байдаг тул олон хэрэглэгчид PST-ийн авлигад өртөж байсан. Ерөнхийдөө, түүнтэй тулгарахдаа эхлээд ирсэн хайрцаг засах хэрэгсэл файлыг засах. Гэсэн хэдий ч хэрэв энэ нь бүтэлгүйтвэл та илүү хүчирхэг, найдвартай гадны хэрэгслийг ашиглаж болно DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. sql авлига програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com