Ինչպես ինքնաբերաբար հեռացնել չեղյալ հայտարարված հանդիպումները ձեր Outlook օրացույցից

Դուք կարող է նկատած լինեք, որ չեղարկված հանդիպումները դեռ կմնան ձեր օրացույցում։ Այն պահանջում է, որ դուք դրանք ձեռքով հեռացնեք, ինչը չափազանց դժվար է։ Հետևաբար, դուք պետք է ցանկանաք, որ Outlook-ը կարողանա ավտոմատ կերպով հեռացնել չեղարկված հանդիպումները։ Այս գրառումը կօգնի ձեզ հասկանալ դա։

Իրականում իմ նախորդ հոդվածը – «Ինչպե՞ս մարտավարորեն հեռացնել չեղյալ հայտարարված հանդիպումները Outlook Calendar- ից»-ը ներկայացրել է մի քանի խորհուրդ՝ չեղարկված հանդիպումները ձեռքով ջնջելու համար: Բացի այդ, այդ հոդվածի վերջին բաժնում կա մի միջոց, որը թույլ է տալիս Outlook-ին ավտոմատ հեռացնել չեղարկված հանդիպումները: Բայց այդ մեթոդը նաև թույլ կտա Outlook-ին ավտոմատ ընդունել հանդիպման բոլոր հրավերը: Սա այն չէ, ինչ դուք երբեմն ուզում եք: Հետևաբար, այստեղ մենք ձեզ ցույց կտանք մեկ այլ ճանապարհ, որը բավականին պարզ է և շատ ավելի հարմար:

Ավտոմատ կերպով հեռացնել չեղարկված հանդիպումները Օրացույցից

1. Սկզբում գործարկեք ձեր Outlook ծրագիրը։
2. Այնուհետև Outlook-ի պատուհանում պետք է սեղմել «Alt + F11» կոճակները:
3. Հաջորդը, VBA խմբագրիչի հաջորդ պատուհանում, դուք պետք է կրկնակի սեղմեք «ThisOutlookSession» նախագծի վրա ձախ կողմում:
4. Հետագայում, դուք պետք է պատճենեք հետևյալ VBA կոդը այս նախագծում:

Private WithEvents objInbox As Outlook.Folder
Private WithEvents objItems As Outlook.Items

Private Sub Application_Startup()
    Set objInbox = Application.Session.GetDefaultFolder(olFolderInbox)
    Set objItems = objInbox.Items
End Sub

'Occurs when the meeting cancellation arrives in your Inbox
Private Sub objItems_ItemAdd(ByVal Item As Object)
    Dim objCalendar As Outlook.Folder
    Dim objAppointments As Outlook.Items
    Dim i As Long
    Dim objMeeting As Outlook.AppointmentItem
 
    If TypeOf Item Is MeetingItem Then
       If Left(LCase(Item.Subject), 9) = "canceled:" Then
          'Remove canceled meeting
          Set objCalendar = Application.Session.GetDefaultFolder(olFolderCalendar)
          Set objAppointments = objCalendar.Items
 
          For i = objAppointments.count To 1 Step -1
              Set objAppointment = objAppointments.Item(i)
              If Left(objAppointment.Subject, 9) = "Canceled:" Then
                 objAppointment.Delete
              End If
         Next
       End If
   End If
End Sub

5. Դրանից հետո դուք կարող եք թվային վկայական հատկացնել այս նախագծին: Կտտացրեք «Գործիքներ» և ընտրեք «Թվային ստորագրություն»: Այնուհետև հետևեք հրաշագործին՝ այն ավարտելու համար:
6. Ավելի ուշ փակեք «Microsoft Visual Basic հավելվածների համար» պատուհանը և գնացեք՝ փոխելու ձեր Outlook մակրո կարգավորումները՝ ստորագրված մակրոները թույլատրելու համար:
7. Ի վերջո, կարող եք վերագործարկել ձեր Outlook-ը՝ նոր VBA նախագիծը միացնելու համար։
8. Այդ ժամանակվանից ի վեր, ամեն անգամ, երբ ձեր էլ. փոստին հանդիպումը չեղարկելու մասին հաղորդագրություն է գալիս, մակրոն կմեկնարկի և չեղարկված հանդիպումը ավտոմատ կերպով կհեռացնի օրացույցից։

Ամբողջությամբ օգտագործեք Inbox Repair Tool-ը

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

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

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