როგორ დავაყენოთ სხვადასხვა სწრაფი დაწკაპუნების დროშები სხვადასხვა სახის Outlook-ის ერთეულებისთვის

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

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

დააყენეთ სხვადასხვა სწრაფი დაწკაპუნების დროშები სხვადასხვა სახის Outlook-ის ერთეულებისთვის

1. თავიდანვე, სtart Outlook VBA რედაქტორი მითითებით "როგორ გაუშვათ VBA კოდი თქვენს Outlook-ში".
2. შემდეგ დააკოპირეთ ქვემოთ მოცემული VBA კოდი „ThisOutlookSession“ პროექტში.

Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objMail As Outlook.MailItem
Public WithEvents objContact As Outlook.ContactItem

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

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

Private Sub objMail_PropertyChange(ByVal Name As String)
    If Name = "ToDoTaskOrdinal" Then
       If objMail.IsMarkedAsTask = True Then
          '"Tomorrow" Flag for Emails
          objMail.TaskStartDate = Now + 1
          objMail.Save
       End If
   End If
End Sub

Private Sub objContact_PropertyChange(ByVal Name As String)
    If Name = "ToDoTaskOrdinal" Then
       If objContact.IsMarkedAsTask = True Then
          '"Today" Flag for Contacts
          objContact.TaskStartDate = Date & " 17:00"
          objContact.Save
       End If
    End If
End Sub

3. ამის შემდეგ, მოათავსეთ კურსორი "Application_Startup" ქვეპროგრამა და დააჭირეთ "F5" ღილაკს ამ მაკროს გასააქტიურებლად.
4. საბოლოოდ, შეგიძლიათ სცადოთ.

• აირჩიეთ ელფოსტა და დააწკაპუნეთ "დროშის" სვეტზე. ელფოსტას ერთდროულად დაემატება „ხვალ“ დროშა.
• შემდეგ, დააწკაპუნეთ კონტაქტზე და დააწკაპუნეთ სვეტზე „დროშა“. დაუყოვნებლივ, არჩეულ კონტაქტს დაემატება დროშა "დღეს".

აკრძალეთ მავნე ელ.წერილები

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

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

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