Күші жойылған кездесулерді Outlook күнтізбесінен қалай автоматты түрде жоюға болады

Outlook шешімдері Қыркүйек 29, 2025
Қазір бөлісу:

Сіз тоқтатылған кездесулер күнтізбеңізде әлі де болатынын байқаған боларсыз. Бұл сізден оны қолмен жоюды талап етеді, бұл тым қиын. Сондықтан Outlook бағдарламасының тоқтатылған кездесулерді автоматты түрде жоя алуын қалауыңыз керек. Бұл жазба сізге мұны түсінуге көмектеседі.

Шындығында, менің алдыңғы мақалам – «Болдырылған жиналыстарды Outlook күнтізбесінен қалай сыпайы түрде жоюға болады” бас тартылған жиналыстарды қолмен жою үшін бірнеше кеңестер ұсынды. Сондай-ақ, осы мақаланың соңғы бөлімінде Outlook бағдарламасына тоқтатылған жиналыстарды автоматты түрде жоюға мүмкіндік беру жолы бар. Бірақ бұл әдіс 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

VBA коды - тоқтатылған жиналыстарды күнтізбеден автоматты түрде жою

  1. Осыдан кейін сіз осы жобаға сандық сертификат тағайындай аласыз. «Құралдар» түймесін басып, «Цифрлық қолтаңбаны» таңдаңыз. Содан кейін оны аяқтау үшін шеберді орындаңыз.
  2. Кейінірек, «Қолданбаларға арналған Microsoft Visual Basic» терезесін жауып, қол қойылған макростарға рұқсат беру үшін Outlook макрос параметрлерін өзгертуге өтіңіз.
  3. Ақырында, жаңа VBA жобасын іске қосу үшін Outlook бағдарламасын қайта іске қосуға болады.
  4. Содан бері, жиналыстың тоқтатылуы туралы хабарлама кіріс жәшігіңізде келген сайын, макрос іске қосылады және тоқтатылған жиналысты күнтізбеден автоматты түрде жояды.

Кіріс жәшігін жөндеу құралын толық пайдаланыңыз

Көптеген Outlook пайдаланушылары Outlook бағдарламасындағы әртүрлі мәселелермен, соның ішінде кішігірім ақаулар, қате туралы хабарлар және кенеттен жауап бермеу, сондай-ақ елеулі зақымдар және т.б. сияқты мәселелерге тап болуы мүмкін. Шынымды айтсам, кішігірім мәселелер үшін Outlook бағдарламасының кірістірілген жөндеу құралы бар – Сканерлеу, бұл оларды оңай түзете алады. Осылайша, Outlook бағдарламасында қиындықтар туындаған кезде, оны суретке түсіру үшін пайдалануға болады. Егер ол сәтсіз болса, тәжірибелі және тамаша үшінші тарап құралының көмегіне жүгінуді жалғастыра аласыз, мысалы DataNumen Outlook Repair.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. SQL қалпына келтіру және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.