Ինչպես ավտոմատ սահմանել հիշեցում և վերջնաժամկետ, երբ նշեք Outlook-ի էլփոստը հետևելու համար

Outlook-ը թույլ է տալիս օգտատերերին նշել նամակները հատուկ հաջորդական հիշեցումներով և վերջնաժամկետով: Բայց դուք պետք է ընտրեք և միացնեք այն ձեռքով: Այս հոդվածը կսովորեցնի ձեզ, թե ինչպես հասնել դրան ավտոմատ կերպով VBA-ի միջոցով:

Outlook-ը մեզ տրամադրում է «Դրոշակ» գործառույթը, որը կարող է մեզ թույլ տալ շատ ավելի հարմար հետևել կարևոր նամակներին: Այն ոչ միայն կարող է մեզ թույլ տալ էլ. Առանց կասկածի, դա շատ հարմար է:

Սակայն շատ օգտատերեր դեռ մեկ այլ ցանկություն ունեն. Նրանք հուսով են, որ Outlook-ը կարող է ավտոմատ կերպով նշել համապատասխան ժամկետը և հիշեցման ժամը դրոշակված նամակներին, օրինակ՝ այսօրվանից 3 օր հետո, այսօրվանից 1 շաբաթ հետո և այլն: Անկեղծ ասած, Outlook-ը նման բնօրինակ հատկություն չունի: Այսպիսով, դուք պետք է վերադառնաք այլ միջոցների, օրինակ, VBA: Այստեղ մենք կսովորեցնենք ձեզ, թե ինչպես օգտագործել Outlook VBA-ն այս պահանջն իրականացնելու համար: Կարդացեք այն մանրամասնորեն ստանալու համար:

Ավտոմատ սահմանեք հիշեցում և վերջնաժամկետ, երբ նշեք Outlook-ի էլ

1. Հենց սկզբից գործարկեք ձեր Outlook ծրագիրը:
2. Այնուհետև կարող եք սեղմել «Alt + F11» ստեղնաշարի դյուրանցումները՝ VBA խմբագիր մուտք գործելու համար:
3. Հաջորդ «Microsoft Visual Basic հավելվածների համար» պատուհանում դուք պետք է կրկնակի սեղմեք «ThisOutlookSession» նախագծի վրա ձախ կողմում:
4. Այնուհետև պատճենեք և տեղադրեք ստորև նշված 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

5. Դրանից հետո դուք պետք է ստորագրեք այս կոդը, ինչպես սովորաբար:
6. Ավելի ուշ դուրս եկեք VBA խմբագրիչից և շարունակեք փոխել ձեր Outlook մակրո կարգավորումները՝ միայն թվային ստորագրված մակրոները միացնելու համար:
7. Վերջապես, նոր մակրոն ակտիվացնելու համար անհրաժեշտ է վերագործարկել Outlook-ը։ Դրանից հետո կարող եք փորձել։

• Կտտացրեք դրոշի պատկերակը էլփոստի տարրի վերջում:
• Միանգամից դրոշն ավտոմատ կերպով կփոխվի «Հաջորդ շաբաթվա դրոշակ» պատկերակի:
• Եվ դրա վերջնաժամկետը և հիշեցման ժամը կսահմանվեն կոդերում ձեր նախնական կարգավորումներին համապատասխան:

Մի վախեցեք, եթե հանդիպեք Outlook-ի վթարի

Երբ Outlook-ը անսպասելիորեն խափանվում է, մարդկանց մեծ մասը խուճապի է մատնվում, քանի որ վախենում են, որ իրենց Outlook-ի տվյալները կվնասվեն։ Բայց իրականում, եթե դուք բավարար նախազգուշական միջոցներ եք ձեռնարկել, երբեք խուճապի չեք մատնվի։ Ամենակարևոր միջոցը PST ֆայլերը պարբերաբար պահուստավորելն է։ Ավելին, կարող եք նաև դիմել առաջատար գործիքի՝ ձեր տվյալները վերականգնելու համար։ վնասված Outlook- ը տվյալներ, ինչպիսիք են DataNumen Outlook Repair.

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում sql ֆիքս և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com