2 metodi efficaci per eliminare in batch tutte le regole di Outlook che eseguono un'azione specifica

Se devi eliminare in batch tutte le regole di Outlook che eseguono un'azione specifica, come "Sposta", "Copia" o "Contrassegna", puoi leggere questo articolo. Qui prenderemo l'azione "Sposta" come esempio per presentarti 2 metodi rapidi.

A volte, potresti voler eliminare tutte le regole che eseguono un'azione specifica in Outlook. Ad esempio, hai ricostruito le strutture delle cartelle nelle tue caselle di posta. Pertanto, intendi riclassificare e archiviare i messaggi di posta elettronica in cartelle diverse. In questo caso, potresti voler eliminare in batch tutte le regole che eseguono l'azione "Sposta". Guardando questo, qui introdurremo 2 modi. Il primo è appropriato per una cassetta postale. Ma se vuoi elaborare tutte le cassette postali in Outlook, è meglio utilizzare il seguente Metodo 2.

Metodo 1: eliminazione batch in una cassetta postale

1. Per cominciare, fai clic su "File".
2. Quindi, nel menu "File", fai clic sul pulsante "Gestisci regole e avvisi".
3. Nella successiva finestra di dialogo "Regole e avvisi", puoi vedere la colonna "Azioni" nell'elenco delle regole. E l'icona dell'azione "Sposta" è .
4. Ora, premi il tasto "Ctrl" e nel frattempo seleziona le regole la cui icona di azione è  uno per uno.
5. Dopo aver selezionato le regole, fai clic sul pulsante "Elimina" sopra l'elenco delle regole.

Metodo 2: eliminazione batch in tutte le cassette postali

1. Per cominciare, avviare l'editor VBA di Outlook secondo “Come eseguire il codice VBA in Outlook".
2. Successivamente, copia il seguente codice VBA in un modulo vuoto.

Sub DeleteAllMoveRules()
    Dim objStores As Outlook.Stores
    Dim objStore As Outlook.Store
    Dim objRules As Outlook.rules
    Dim i As Long
    Dim objRule As Outlook.Rule
    Dim objRuleAction, objMoveRuleAction As Outlook.RuleAction
 
    Set objStores = Outlook.Application.Session.Stores
 
    'Process all mailboxes
    For Each objStore In objStores
        Set objRules = objStore.GetRules
 
        For i = objRules.Count To 1 Step -1
            Set objRule = objRules(i)
            For Each objRuleAction In objRule.Actions
                'If "Move" action is enabled
                If objRuleAction.ActionType = olRuleActionMoveToFolder Then
                   Set objMoveRuleAction = objRuleAction
                   If objMoveRuleAction.Enabled = True Then
                      'Delete the rule
                      objRules.Remove (objRule.Name)
                      On Error Resume Next
                      objRules.Save
                      Exit For
                   End If
                 End If
            Next
       Next i
    Next
End Sub

3. Successivamente, premi il tasto "F5" per eseguire questa macro in questo momento.
4. Al termine della macro, controlla le regole di ogni casella di posta in Outlook. Tutte le regole relative all'azione "Sposta" sono sparite.

Fare con preoccupanti errori di Outlook

Ricevi messaggi di errore durante l'utilizzo di Outlook? In realtà, Outlook è soggetto a errori e persino alla corruzione. Pertanto, è comune riscontrare errori di Outlook. Fortunatamente, Outlook fornisce lo strumento di correzione integrato: Scansione. Puoi usarlo per provare a correggere gli errori. Se fallisce, la tua ultima risorsa è uno strumento esterno più abile e potente, come DataNumen Outlook Repair.

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 e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com