Outlook საშუალებას აძლევს მომხმარებლებს მონიშნონ ელფოსტა მორგებული შემდგომი შეხსენებით და ვადის გასვლის თარიღით. მაგრამ თქვენ უნდა აირჩიოთ და ჩართოთ ხელით. ეს სტატია გასწავლით თუ როგორ მიაღწიოთ ამას ავტომატურად VBA-ს საშუალებით.
Outlook გვაწვდის "დროშის" ფუნქციას, რომელიც საშუალებას მოგვცემს მივყვეთ კრიტიკულ წერილებს ბევრად უფრო მოხერხებულად. ის არა მხოლოდ საშუალებას გვაძლევს გავაკეთოთ ელფოსტა, არამედ ის გვაძლევს საშუალებას ავირჩიოთ სასურველი დროშის ხატულა, მივუთითოთ კონკრეტული ვადა და მივუთითოთ ელ. ფოსტის პირადი შეხსენებაც. ყოველგვარი ეჭვის გარეშე, ეს ძალიან მოსახერხებელია.
მაგრამ ბევრ მომხმარებელს ჯერ კიდევ აქვს სხვა სურვილი. ისინი იმედოვნებენ, რომ Outlook-ს შეუძლია ავტომატურად მიუთითოს შედარებით ფიქსირებული გადახდის თარიღი და შეხსენების დრო დროშით მონიშნულ ელფოსტაზე, როგორიცაა 3 დღე დღევანდელი დღიდან, 1 კვირა დღეიდან და ა.შ. აქედან გამომდინარე, თქვენ უნდა დაუბრუნდეთ სხვა საშუალებებს, მაგალითად, VBA. აქ ჩვენ გასწავლით, თუ როგორ გამოიყენოთ Outlook VBA ამ მოთხოვნის შესასრულებლად. წაიკითხეთ, რომ მიიღოთ იგი დეტალურად.
Outlook-ის ელფოსტის მონიშვნისას ავტომატურად დააყენეთ შეხსენება და ვადა
- თავიდანვე გაუშვით თქვენი Outlook პროგრამა.
- შემდეგ შეგიძლიათ დააჭიროთ "Alt + F11" კლავიშების მალსახმობებს, რომ მიიღოთ წვდომა VBA რედაქტორზე.
- შემდეგი "Microsoft Visual Basic აპლიკაციებისთვის" ფანჯარაში, თქვენ უნდა დააწკაპუნოთ ორჯერ "ThisOutlookSession" პროექტზე მარცხენა მხარეს.
- ამის შემდეგ, დააკოპირეთ და ჩასვით ქვემოთ მოცემული VBA კოდები მასში.
Public WithEvents objInboxItems As Outlook.Items
Private Sub Application_Startup()
Set objInboxItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub objInboxItems_ItemChange(ByVal Item As Object)
Dim objMail As Outlook.MailItem
If TypeOf Item Is MailItem Then
Set objMail = Item
If (objMail.IsMarkedAsTask = True) And (objMail.FlagStatus <> olFlagComplete) Then
'You can change the following lines as per your actual needs
With objMail
.FlagRequest = "Type the custom follow-up notes here"
.MarkAsTask olMarkNextWeek
'Set a custom due date
.TaskDueDate = Now + 7
.ReminderSet = True
'Set a custom reminder time
.ReminderTime = Now + 6.5
.Save
End With
End If
End If
End Sub
- ამის შემდეგ, თქვენ უნდა მოაწეროთ ეს კოდი ჩვეულებრივად.
- მოგვიანებით გამოდით VBA რედაქტორიდან და განაგრძეთ თქვენი Outlook მაკრო პარამეტრების შეცვლა, რათა ჩართოთ მხოლოდ ციფრულად ხელმოწერილი მაკროები.
- და ბოლოს, ახალი მაკროს გასააქტიურებლად, Outlook-ის გადატვირთვა დაგჭირდებათ. ამის შემდეგ შეგიძლიათ სცადოთ.
- დააწკაპუნეთ დროშის ხატულაზე ელ.ფოსტის ერთეულის ბოლოში.
- დაუყოვნებლივ, დროშა ავტომატურად შეიცვლება "შემდეგი კვირის დროშის" ხატულაზე.
- და მისი ვადის გასვლის თარიღი და შეხსენების დრო დაყენდება კოდებში თქვენი წინასწარ დაყენების შესაბამისად.
არ შეგეშინდეთ, თუ Outlook-ის კრახი შეგექმნათ
როდესაც Outlook მოულოდნელად ითიშება, ადამიანების უმეტესობა პანიკაში ჩავარდება, რადგან ეშინიათ, რომ მათი Outlook მონაცემები დაზიანდება. თუმცა, სინამდვილეში, თუ საკმარის ზომებს მიიღებთ, პანიკაში არასდროს ჩავარდებით. ყველაზე მნიშვნელოვანი ზომაა PST ფაილების რეგულარული სარეზერვო ასლის შექმნა. გარდა ამისა, თქვენი მონაცემების აღსადგენად ასევე შეგიძლიათ მიმართოთ საუკეთესო ინსტრუმენტს. დაზიანებული Outlook მონაცემები, როგორიცაა DataNumen Outlook Repair.
ავტორი შესავალი:
შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის sql შესწორება და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად


