როგორ მოარგოთ დროშის ტექსტები დროშით მონიშნულ ნივთებში თქვენს Outlook-ში

როდესაც ანიშნებთ ერთეულს, ნაგულისხმევი დროშის ტექსტი არის „Follow up“. თუ გსურთ მისი მორგება, შეგიძლიათ წაიკითხოთ ეს სტატია. აქ ჩვენ გასწავლით VBA-ს გამოყენებას მის გასაცნობიერებლად.

ნაგულისხმევად, როდესაც ერთეულს დროშით მონიშნავთ, შენიშვნა არის „Follow up“. თუ გსურთ შეცვალოთ იგი, უნდა აირჩიოთ „მორგებული“ დროშის ვარიანტი და შემდეგ შეიყვანოთ სასურველი ტექსტი ამომხტარ დიალოგურ ფანჯარაში. თუ თქვენ ხშირად გჭირდებათ კონკრეტული მორგებული დროშის ტექსტების მინიჭება, აუცილებლად არ მოგეწონებათ ზემოაღნიშნული გზა, რადგან ის ძალიან პრობლემურია. ამიტომ, აქ ჩვენ გაგიზიარებთ ჭკვიან მეთოდს. ის პირდაპირ მოარგებს დროშის ტექსტებს თქვენი გემოვნებით. ახლა წაიკითხეთ მისი დეტალური ნაბიჯების გასაგებად.

დროშის ტექსტების მორგება დროშით მონიშნულ ნივთებში

1. დასაწყისისთვის, შეცვალეთ მაკროს პარამეტრები „როგორ გაუშვათ VBA კოდი თქვენს Outlook-ში".
2. შემდეგ დააჭირეთ "Alt + F11" VBA რედაქტორზე წვდომისთვის.
3. შემდეგი, გახსენით პროექტი "ThisOutlookSession" და ჩასვით შემდეგი კოდი.

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. ამის შემდეგ, გადატვირთეთ თქვენი Outlook ამ მაკროს გასააქტიურებლად.
5. საბოლოოდ, შეგიძლიათ სცადოთ.

• პირველ რიგში, აირჩიეთ ან გახსენით Outlook ელემენტი.
• შემდეგ, მონიშნეთ ის, როგორც ყოველთვის.
• ერთდროულად დაინახავთ ამ ელემენტს მინიჭებულ მორგებულ დროშის ტექსტებს, როგორც ეს ნაჩვენებია შემდეგ სურათზე.

რა მოხდება, თუ PST ფაილი მიუწვდომელი გახდება

დადასტურებულია, რომ Outlook ფაილი მიდრეკილია კორუფციისკენ სხვადასხვა ფაქტორების გამო. მაგალითად, თუ ხშირად ხურავთ თქვენს Outlook აპლიკაციას არასწორად ან შემთხვევით ჩამოტვირთავთ მავნე დანართებს, PST ფაილი შეიძლება დაზიანდეს. იმ დროს, თქვენი პირველი კურორტი არის ჩაშენებული სარემონტო ხელსაწყოს გამოყენება - Scanpst. თუმცა, თუ ის ვერ მოხერხდა, თქვენ სხვა გზა არ გაქვთ, გარდა იმისა, რომ დაუბრუნდეთ უფრო პროფესიონალურ გარე პროგრამას, მაგალითად DataNumen Outlook Repair, რომელიც ძალიან დაფასდა მისი მაღალი გამო PST აღდგენა განაკვეთი.

ავტორი შესავალი:

შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის კორუმპირებული SQL Server და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად