2 medel för att snabbt ta bort duplicerade helgdagar i din Outlook-kalender

Om du lägger till samma helgdagar i samma kalender två gånger eller fler gånger av misstag kommer du att upptäcka att kalendern är fylld med dubbla helgdagar. I det här scenariot måste du vilja ta bort dubbletterna. Nu kommer den här artikeln att lära dig två medel.

Outlook har en inbyggd funktion för att snabbt lägga till helgdagar i standardkalendern. Det är utan tvekan ganska bekvämt för användarna. Om du emellertid felaktigt lägger till helgdagarna två eller flera gånger kommer din standardkalender att fyllas i med dubbla helgdagar. Nu, i det följande, presenterar vi dig två metoder för att snabbt ta bort dubbletterna.

Ta snabbt bort duplicerade helgdagar i din Outlook-kalender

Metod 1: Ta bort alla helgdagar och lägg till dem igen

  1. Till starstarta ditt Outlook-program.
  2. Gå sedan till källkalendermappen.
  3. Byt sedan till fliken "Visa" och välj "Ändra vy"> "Lista".Ändra kalendervyn till listvy
  4. Därefter ska du klicka på knappen "Kategorier" i gruppen "Arrangemang".
  5. Därefter ser du att alla möten har grupperats efter kategorier.
  6. Nu kan du ta reda på gruppen "Semester".
  7. Slutligen klickar du på grupphuvudet "Semester" och trycker sedan på "Radera" -tangenten.Gruppera efter kategorier och ta bort alla helgdagar
  8. På en gång har alla befintliga helgdagar tagits bort.
  9. När du har tagit bort dem kan du lägga till semestern igen. Gå först till ”Arkiv”> Alternativ ”.
  10. I popup-fönstret "Outlook-alternativ" kan du växla till fliken "Kalender".
  11. Under den här fliken kommer du att kunna hitta knappen "Lägg till helgdagar".
  12. Välj sedan en plats i den nya dialogrutan, till exempel "USA" och tryck på "OK".Lägg till semester igen
  13. Så småningom har helgdagarna importerats till standardkalendern igen.

Metod 2: Ta bort duplicerade helgdagar med VBA

  1. Från början trycker du på “Alt + F11” -knapparna.
  2. Därefter kommer du till Outlook VBA-redigeringsfönstret, där du kan öppna en oanvänd modul.
  3. Kopiera därefter följande VBA-kod till den här modulen.
Sub RemoveDuplicateHolidays()
    Dim objStores As Outlook.Stores
    Dim objStore As Outlook.Store
    Dim objPSTFile As Outlook.Folder
    Dim objFolders As Outlook.folders
    Dim objFolder As Object

    Set objStores = Outlook.Application.Session.Stores
 
    'Process all Outlook PST files in your Outlook
    For Each objStore In objStores
        Set objPSTFile = objStore.GetRootFolder
        For Each objFolder In objPSTFile.folders
            Call ProcessFolders(objFolder)
        Next
    Next

End Sub

Sub ProcessFolders(ByVal objCurrentFolder As Outlook.Folder)
    Dim objDictionary As Object
    Dim i As Long
    Dim objItem As Object
    Dim strKey As String

    Set objDictionary = CreateObject("Scripting.Dictionary")

    If objCurrentFolder.DefaultItemType = olAppointmentItem Then
       For i = objCurrentFolder.Items.count To 1 Step -1
           Set objItem = objCurrentFolder.Items.Item(i)
 
           'Get all holidays based on the "Holiday" category
           If objItem.Categories = "Holiday" Then
              strKey = objItem.Subject & "," & objItem.Location & "," & objItem.Body & "," & objItem.Categories
              strKey = Replace(strKey, ", ", Chr(32))

              If objDictionary.Exists(strKey) = True Then
                 objItem.Delete
              Else
                 objDictionary.Add strKey, True
              End If
          End If
       Next i
    End If
End Sub

VBA-kod - Ta snabbt bort duplicerade helgdagar i din Outlook-kalender

  1. I slutändan kan du prova detta makro.
  • Klicka på underrutinen "Ta bortDuplicateHolidays".
  • Tryck sedan på F5-tangenten för att köra den.
  • När det har slutförts tas alla duplicerade helgdagar i alla dina Outlook-kalendrar bort.

Hämta värdefulla Outlook-data

Det är ett obestridligt faktum att inget program kan garantera att det kan vara immun mot fel och korruption. Detsamma gäller för Outlook. Därför, för att skydda dina Outlook-data, skulle du bättre göra regelbundna säkerhetskopior av data. Dessutom måste du planera en Outlook-återställningsplan i förväg. Sist men inte minst är det klokt att förbereda ett ansedd fixverktyg, t.ex. DataNumen Outlook Repair. Det kan reparera Outlook problem snabbt och få tillbaka maximal Outlook-data från komprometterad fil.

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 återhämta Sql Server och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com

Kommentarer är stängda.