Outlook-da Bayraqlı Elementlərdə Bayraq Mətnlərini Necə Fərdiləşdirmək olar

Elementi işarələdiyiniz zaman defolt bayraq mətni “İzlə”dir. Onu fərdiləşdirmək istəyirsinizsə, bu məqaləni oxuya bilərsiniz. Burada onu həyata keçirmək üçün VBA-dan istifadə etməyi öyrədəcəyik.

Varsayılan olaraq, elementi işarələdiyiniz zaman qeyd "İzlə" olur. Əgər onu dəyişdirmək istəyirsinizsə, “Xüsusi” bayraq seçimini seçməli və sonra açılan informasiya qutusuna istədiyiniz mətni daxil etməlisiniz. Əgər siz tez-tez xüsusi hazırlanmış bayraq mətnləri təyin etməlisinizsə, şübhəsiz ki, yuxarıda göstərilən yolu bəyənməyəcəksiniz, çünki bu, çox əziyyətlidir. Buna görə də, burada ağıllı bir üsul paylaşacağıq. O, bayraq mətnlərini birbaşa bəyəndiyinizə uyğunlaşdıracaq. İndi onun ətraflı addımlarını əldə etmək üçün oxuyun.

Bayraqlı Elementlərdə Bayraq Mətnlərini fərdiləşdirin

1. Başlamaq üçün makro parametrlərini ""ə uyğun olaraq dəyişdirinOutlook-da VBA kodunu necə işlətmək olar".
2. Sonra VBA redaktoruna daxil olmaq üçün "Alt + F11" düyməsini basın.
3. Sonra, "ThisOutlookSession" layihəsini açın və aşağıdakı kodu yapışdırın.

Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMail As Outlook.MailItem

Private Sub Application_Startup()
    Set objExplorer = Outlook.Application.ActiveExplorer
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objExplorer_SelectionChange()
    On Error Resume Next
    If objExplorer.Selection.Item(1).Class = olMail Then
       Set objMail = objExplorer.Selection.Item(1)
    End If
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If Inspector.currentItem.Class = olMail Then
       Set objMail = Inspector.currentItem
    End If
End Sub

Private Sub objMail_PropertyChange(ByVal Name As String)
    Dim strFlagRequest As String
 
    If Name = "FlagStatus" Then
       If objMail.IsMarkedAsTask = True Then
          If objMail.FlagStatus <> olFlagComplete And objMail.FlagStatus <> olNoFlag Then
             'Enter your preferred note
             objMail.FlagRequest = "Custom Flag texts"
             objMail.Save
         End If
       End If
    End If
End Sub

4. Bundan sonra, bu makronu aktivləşdirmək üçün Outlook-u yenidən başladın.
5. Nəhayət, cəhd edə bilərsiniz.

• Əvvəlcə Outlook elementini seçin və ya açın.
• Sonra, həmişəki kimi işarələyin.
• Aşağıdakı şəkildə göstərildiyi kimi, dərhal bu elementə təyin edilmiş fərdi bayraq mətnlərini görəcəksiniz.

PST faylı əlçatmaz olarsa nə olacaq?

Sübut edilmişdir ki, Outlook faylı müxtəlif amillərə görə korrupsiyaya meyllidir. Məsələn, Outlook proqramınızı tez-tez düzgün şəkildə bağlasanız və ya təsadüfən zərərli əlavələri yükləsəniz, PST faylı zədələnə bilər. O zaman ilk çarəniz daxili təmir alətindən istifadə etməkdir - Scanpst. Bununla belə, uğursuz olarsa, daha peşəkar bir xarici yardım proqramına müraciət etməkdən başqa seçiminiz yoxdur DataNumen Outlook Repair, yüksək olduğuna görə çox bəyənilmişdir PST bərpası dərəcəsi.

Müəllif Giriş:

Shirley Zhang məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc satqın SQL Server və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com