2 Efektivní dávkové metody Odstranit všechna pravidla aplikace Outlook provádějící konkrétní akci

Pokud potřebujete hromadně odstranit všechna pravidla aplikace Outlook, která provádějí konkrétní akci, například „Přesunout“, „Kopírovat“ nebo „Označit“, můžete si přečíst tento článek. Zde si vezmeme jako příklad akci „Přesunout“, abychom vám představili 2 rychlé metody.

Někdy můžete chtít odstranit všechna pravidla provádějící konkrétní akci v Outlooku. Například jste přestavěli struktury složek ve svých poštovních schránkách. Máte tedy v úmyslu překlasifikovat a archivovat e-maily do různých složek. V takovém případě budete chtít hromadně odstranit všechna pravidla provádějící akci „Přesunout“. Podíváme-li se na to, představíme 2 způsoby. První je vhodný pro jednu poštovní schránku. Pokud však chcete zpracovat všechny poštovní schránky ve vašem Outlooku, použijte následující metodu 2.

Metoda 1: Dávkové odstranění v jedné poštovní schránce

1. Nejprve klikněte na „Soubor“.
2. Poté v nabídce „Soubor“ klikněte na tlačítko „Spravovat pravidla a upozornění“.
3. V dalším dialogovém okně „Pravidla a upozornění“ se v seznamu pravidel zobrazí sloupec „Akce“. A ikona akce „Přesunout“ je .
4. Nyní stiskněte klávesu „Ctrl“ a zatím vyberte pravidla, jejichž ikona akce je  jeden za druhým.
5. Po výběru pravidel klikněte na tlačítko „Odstranit“ nad seznamem pravidel.

Metoda 2: Dávkové odstranění ve všech poštovních schránkách

1. Pro začátek spusťte editor VBA v Outlooku podle „Jak spustit kód VBA ve vašem Outlooku".
2. Dále zkopírujte následující kód VBA do prázdného modulu.

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. Poté stiskněte klávesu „F5“ pro spuštění tohoto makra právě teď.
4. Po dokončení makra zkontrolujte pravidla každé poštovní schránky ve vašem Outlooku. Všechna pravidla související s akcí „Přesunout“ jsou pryč.

Dělejte si starosti s chybami aplikace Outlook

Zobrazují se během používání aplikace Outlook nějaké chybové zprávy? Ve skutečnosti je Outlook náchylný k chybám a dokonce k poškození. Proto je běžné setkat se s chybami aplikace Outlook. Naštěstí Outlook poskytuje vestavěný nástroj pro opravu - scanpst. Můžete jej použít k pokusu o opravu chyb. Pokud selže, je vaší poslední možností šikovnější a účinnější externí nástroj DataNumen Outlook Repair.

Úvod autora:

Shirley Zhang je expertem na obnovu dat DataNumen, Inc., která je světovým lídrem v oblasti technologií pro obnovu dat, včetně obnovit sql a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com