2 Mittel zum schnellen Entfernen doppelter Feiertage in Ihrem Outlook-Kalender

Wenn Sie versehentlich dieselben Feiertage zweimal oder mehrmals zu demselben Kalender hinzufügen, werden Sie feststellen, dass der Kalender mit doppelten Feiertagen gefüllt ist. In diesem Szenario müssen Sie die Duplikate entfernen möchten. In diesem Artikel lernen Sie nun zwei Mittel.

Outlook verfügt über eine integrierte Funktion, mit der Feiertage schnell zum Standardkalender hinzugefügt werden können. Es ist zweifellos ziemlich praktisch für Benutzer. Wenn Sie die Feiertage jedoch zweimal oder mehrmals versehentlich hinzufügen, wird Ihr Standardkalender mit den doppelten Feiertagen gefüllt. Im Folgenden werden nun zwei Ansätze vorgestellt, mit denen Sie die Duplikate schnell entfernen können.

Methode 1: Entfernen Sie alle Feiertage und fügen Sie sie erneut hinzu

1. Starten Sie zunächst Ihr Outlook-Programm.
2. Greifen Sie dann auf den Quellkalenderordner zu.
3. Wechseln Sie anschließend zur Registerkarte "Ansicht" und wählen Sie "Ansicht ändern"> "Liste".
4. Danach sollten Sie in der Gruppe "Arrangement" auf die Schaltfläche "Kategorien" klicken.
5. Als Nächstes sehen Sie, dass alle Termine nach Kategorien gruppiert wurden.
6. Jetzt können Sie die Gruppe "Urlaub" herausfinden.
7. Klicken Sie abschließend auf die Gruppenüberschrift „Urlaub“ und drücken Sie die Taste „Löschen“.
8. Sofort wurden alle vorhandenen Feiertage entfernt.
9. Nachdem Sie sie gelöscht haben, können Sie den Feiertag erneut hinzufügen. Gehen Sie zunächst zu "Datei"> "Optionen".
10. Im Popup-Fenster "Outlook-Optionen" können Sie zur Registerkarte "Kalender" wechseln.
11. Auf dieser Registerkarte finden Sie die Schaltfläche "Feiertage hinzufügen".
12. Wählen Sie dann im neuen Dialogfeld einen Ort aus, z. B. "USA", und klicken Sie auf "OK".
13. Schließlich wurden die Feiertage wieder in den Standardkalender importiert.

Methode 2: Entfernen Sie doppelte Feiertage mit VBA

1. Drücken Sie gleich zu Beginn die Tasten „Alt + F11“.
2. Als Nächstes greifen Sie auf das Outlook VBA-Editorfenster zu, in dem Sie ein nicht verwendetes Modul öffnen können.
3. Kopieren Sie anschließend den folgenden VBA-Code in dieses Modul.

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

4. Letztendlich können Sie dieses Makro ausprobieren.

• Klicken Sie in die Unterroutine "RemoveDuplicateHolidays".
• Drücken Sie dann die Taste F5, um es auszuführen.
• Nach Abschluss des Vorgangs werden alle doppelten Feiertage in allen Outlook-Kalendern entfernt.

Wertvolle Outlook-Daten abrufen

Es ist eine unbestrittene Tatsache, dass kein Programm garantieren kann, dass es gegen Fehler und Korruption immun ist. Gleiches gilt für Outlook. Um Ihre Outlook-Daten zu schützen, sollten Sie daher regelmäßig Datensicherungen durchführen. Außerdem müssen Sie im Voraus einen Outlook-Wiederherstellungsplan planen. Last but not least ist es ratsam, ein seriöses Fix-Tool vorzubereiten, wie z DataNumen Outlook Repair. Es ist in der Lage Outlook reparieren Probleme im Handumdrehen und maximale Outlook-Daten aus kompromittierten Dateien zurückerhalten.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich erholen Sql Server und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX