2 Mezzi per rimuovere rapidamente le festività duplicate nel calendario di Outlook

Se aggiungi accidentalmente le stesse festività allo stesso calendario due o più volte, scoprirai che il calendario è pieno di festività duplicate. In questo scenario, devi desiderare di rimuovere i duplicati. Ora, questo articolo ti insegnerà 2 mezzi.

Outlook ha una funzionalità integrata per aggiungere rapidamente le festività al calendario predefinito. È senza dubbio abbastanza conveniente per gli utenti. Tuttavia, se aggiungi le festività due o più volte per errore, il tuo calendario predefinito verrà riempito con le festività duplicate. Ora, di seguito, ti presenteremo 2 approcci per rimuovere rapidamente i duplicati.

Metodo 1: rimuovi tutte le festività e aggiungile di nuovo

1. Per iniziare, avvia il programma Outlook.
2. Quindi accedi alla cartella Calendario di origine.
3. Quindi passa alla scheda "Visualizza" e scegli "Cambia vista"> "Elenco".
4. Successivamente, dovresti fare clic sul pulsante "Categorie" nel gruppo "Disposizione".
5. Successivamente, vedrai che tutti gli appuntamenti sono stati raggruppati per categorie.
6. Ora puoi scoprire il gruppo "Holiday".
7. Infine, fai clic sull'intestazione del gruppo "Festività" e quindi premi il tasto "Elimina".
8. In una volta, tutte le festività esistenti sono state rimosse.
9. Dopo averli eliminati, puoi aggiungere nuovamente la vacanza. Innanzitutto, vai su "File"> Opzioni".
10. Nella finestra popup "Opzioni di Outlook", puoi passare alla scheda "Calendario".
11. Sotto questa scheda, sarai in grado di individuare il pulsante "Aggiungi festività".
12. Quindi, nella nuova finestra di dialogo, seleziona una posizione, ad esempio "Stati Uniti" e premi "OK".
13. Alla fine, le festività sono state nuovamente importate nel calendario predefinito.

Metodo 2: rimuovere le festività duplicate con VBA

1. All'inizio, premi i pulsanti "Alt + F11".
2. Successivamente, accederai alla finestra dell'editor VBA di Outlook, in cui puoi aprire un modulo inutilizzato.
3. Successivamente, copia il seguente codice VBA in questo modulo.

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. Alla fine, puoi provare questa macro.

• Fai clic sulla subroutine "RimuoviDuplicateHolidays".
• Quindi premere il tasto F5 per eseguirlo.
• Al termine, tutte le festività duplicate in tutti i calendari di Outlook vengono rimosse.

Recupera preziosi dati di Outlook

È un fatto indiscusso che nessun programma può garantire che possa essere immune da errori e corruzione. Lo stesso vale per Outlook. Pertanto, al fine di proteggere i dati di Outlook, è meglio eseguire backup regolari dei dati. Inoltre, è necessario pianificare in anticipo un piano di ripristino di Outlook. Ultimo ma non meno importante, è prudente preparare uno strumento di riparazione affidabile, come ad esempio DataNumen Outlook Repair. È in grado di riparare Outlook problemi in un batter d'occhio e recupera il massimo dei dati di Outlook dal file compromesso.

Introduzione dell'autore:

Shirley Zhang è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui recuperare Sql Server e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com