Så här tar du automatiskt bort avbrutna möten från din Outlook-kalender

Outlook-lösningar September 29, 2025

Du kanske har märkt att de avbrutna mötena fortfarande finns i din kalender. Det kräver att du tar bort det manuellt, vilket är för besvärligt. Således måste du önska att Outlook automatiskt kan ta bort inställda möten. Detta post hjälper dig att inse det.

Egentligen min tidigare artikel - “Hur man tar bort avbrutna möten från Outlook-kalendern taktfullt”Har introducerat några tips för att radera inställda möten manuellt. I det sista avsnittet i den artikeln finns det också ett sätt att låta Outlook automatiskt ta bort de avbrutna mötena. Men den metoden låter också Outlook automatiskt acceptera alla mötesinbjudningar. Det här är inte vad du vill ibland. Därför visar vi här ett annat sätt, vilket är ganska enkelt och mycket bekvämare.

Ta bort avbrutna möten automatiskt från din Outlook-kalender

Ta bort avbrutna möten automatiskt från kalendern

  1. Från början, start ditt Outlook-program.
  2. Sedan borde du trycka på “Alt + F11” -tangenterna i Outlook-fönstret.
  3. Därefter måste du i det efterföljande VBA-redigeringsfönstret dubbelklicka på “ThisOutlookSession” -projektet till vänster.
  4. Därefter bör du kopiera följande VBA-kod till detta projekt.
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-kod - Ta bort avbrutna möten automatiskt från kalendern

  1. Därefter kan du tilldela ett digitalt certifikat till detta projekt. Klicka på "Verktyg" och välj "Digital signatur". Följ guiden för att slutföra den.
  2. Senare stänger du “Microsoft Visual Basic for Applications” -fönstret och går för att ändra dina Outlook-makroinställningar för att tillåta signerade makron.
  3. Så småningom kan du restart din Outlook för att aktivera det nya VBA-projektet.
  4. Sedan dess kommer makrot att varje gång när ett mötesavbrott anländer till din inkorgtart och ta bort det inställda mötet automatiskt från kalendern.

Använd fullständigt reparationsverktyget för inkorgen

Många Outlook-användare kan ha plågats av olika problem i deras Outlook, inklusive små funktionsstörningar, felmeddelanden och plötsligt inte svarar samt allvarliga skador etc. För att vara ärlig, för de små problemen har Outlook ett inbyggt reparationsverktyg - Scanpst, som enkelt kan fixa dem. Därför, när du stöter på problem i Outlook, kan du använda den för att ta ett skott. Om det misslyckas kan du fortsätta att ta hjälp av ett erfaret och anmärkningsvärt tredjepartsverktyg, t.ex. DataNumen Outlook Repair.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive SQL-återhämtning och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com

Kommentarer är stängda.