How do I remove a rule from outlook through VBA?





.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty{ height:90px;width:728px;box-sizing:border-box;
}







-1















 Sub Test()
Outlook.Session.DefaultStore.GetRules.Remove ("Close")
End Sub


What am I missing? The above does not remove the rule with that name..










share|improve this question

























  • As it stands you have the code but you are missing the problem statement and the error and/or code.

    – jww
    Nov 25 '18 at 5:14













  • I simply want the above code to run when the Sub is executed. However, it is not deleting the rule under that name... why? What is a problem statement?

    – user241619
    Nov 25 '18 at 5:18











  • @user241619 Are you saving the changes after removing a rule? GetRules.Save()

    – Ambrish Pathak
    Nov 25 '18 at 5:27













  • @AmbrishPathak How do yo suggest I implement GetRules.Save() with the above?

    – user241619
    Nov 25 '18 at 16:31











  • Like this Outlook.Session.DefaultStore.GetRules.Save

    – Ambrish Pathak
    Nov 25 '18 at 17:22




















-1















 Sub Test()
Outlook.Session.DefaultStore.GetRules.Remove ("Close")
End Sub


What am I missing? The above does not remove the rule with that name..










share|improve this question

























  • As it stands you have the code but you are missing the problem statement and the error and/or code.

    – jww
    Nov 25 '18 at 5:14













  • I simply want the above code to run when the Sub is executed. However, it is not deleting the rule under that name... why? What is a problem statement?

    – user241619
    Nov 25 '18 at 5:18











  • @user241619 Are you saving the changes after removing a rule? GetRules.Save()

    – Ambrish Pathak
    Nov 25 '18 at 5:27













  • @AmbrishPathak How do yo suggest I implement GetRules.Save() with the above?

    – user241619
    Nov 25 '18 at 16:31











  • Like this Outlook.Session.DefaultStore.GetRules.Save

    – Ambrish Pathak
    Nov 25 '18 at 17:22
















-1












-1








-1


1






 Sub Test()
Outlook.Session.DefaultStore.GetRules.Remove ("Close")
End Sub


What am I missing? The above does not remove the rule with that name..










share|improve this question
















 Sub Test()
Outlook.Session.DefaultStore.GetRules.Remove ("Close")
End Sub


What am I missing? The above does not remove the rule with that name..







vba outlook-vba outlook-2016






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited Nov 25 '18 at 5:19







user241619

















asked Nov 25 '18 at 5:07









user241619user241619

257




257













  • As it stands you have the code but you are missing the problem statement and the error and/or code.

    – jww
    Nov 25 '18 at 5:14













  • I simply want the above code to run when the Sub is executed. However, it is not deleting the rule under that name... why? What is a problem statement?

    – user241619
    Nov 25 '18 at 5:18











  • @user241619 Are you saving the changes after removing a rule? GetRules.Save()

    – Ambrish Pathak
    Nov 25 '18 at 5:27













  • @AmbrishPathak How do yo suggest I implement GetRules.Save() with the above?

    – user241619
    Nov 25 '18 at 16:31











  • Like this Outlook.Session.DefaultStore.GetRules.Save

    – Ambrish Pathak
    Nov 25 '18 at 17:22





















  • As it stands you have the code but you are missing the problem statement and the error and/or code.

    – jww
    Nov 25 '18 at 5:14













  • I simply want the above code to run when the Sub is executed. However, it is not deleting the rule under that name... why? What is a problem statement?

    – user241619
    Nov 25 '18 at 5:18











  • @user241619 Are you saving the changes after removing a rule? GetRules.Save()

    – Ambrish Pathak
    Nov 25 '18 at 5:27













  • @AmbrishPathak How do yo suggest I implement GetRules.Save() with the above?

    – user241619
    Nov 25 '18 at 16:31











  • Like this Outlook.Session.DefaultStore.GetRules.Save

    – Ambrish Pathak
    Nov 25 '18 at 17:22



















As it stands you have the code but you are missing the problem statement and the error and/or code.

– jww
Nov 25 '18 at 5:14







As it stands you have the code but you are missing the problem statement and the error and/or code.

– jww
Nov 25 '18 at 5:14















I simply want the above code to run when the Sub is executed. However, it is not deleting the rule under that name... why? What is a problem statement?

– user241619
Nov 25 '18 at 5:18





I simply want the above code to run when the Sub is executed. However, it is not deleting the rule under that name... why? What is a problem statement?

– user241619
Nov 25 '18 at 5:18













@user241619 Are you saving the changes after removing a rule? GetRules.Save()

– Ambrish Pathak
Nov 25 '18 at 5:27







@user241619 Are you saving the changes after removing a rule? GetRules.Save()

– Ambrish Pathak
Nov 25 '18 at 5:27















@AmbrishPathak How do yo suggest I implement GetRules.Save() with the above?

– user241619
Nov 25 '18 at 16:31





@AmbrishPathak How do yo suggest I implement GetRules.Save() with the above?

– user241619
Nov 25 '18 at 16:31













Like this Outlook.Session.DefaultStore.GetRules.Save

– Ambrish Pathak
Nov 25 '18 at 17:22







Like this Outlook.Session.DefaultStore.GetRules.Save

– Ambrish Pathak
Nov 25 '18 at 17:22














1 Answer
1






active

oldest

votes


















0














See the example code below:



...
...
'Get Rules from Session.DefaultStore object
Set colRules = Application.Session.DefaultStore.GetRules()

'Loop through all rules
For i = colRules.Count To 1 Step -1
'Look for oRuleName
If colRules.Item(i).Name = oRuleName Then
'If oRuleName found, remove oRuleName rule and save rules
colRules.Remove (oRuleName)
colRules.Save '''''Important'''''
GoTo Continue 'Once oRuleName found, removed and rules saved, jump to Continue
End If
Next


Find the reference link here






share|improve this answer
























    Your Answer






    StackExchange.ifUsing("editor", function () {
    StackExchange.using("externalEditor", function () {
    StackExchange.using("snippets", function () {
    StackExchange.snippets.init();
    });
    });
    }, "code-snippets");

    StackExchange.ready(function() {
    var channelOptions = {
    tags: "".split(" "),
    id: "1"
    };
    initTagRenderer("".split(" "), "".split(" "), channelOptions);

    StackExchange.using("externalEditor", function() {
    // Have to fire editor after snippets, if snippets enabled
    if (StackExchange.settings.snippets.snippetsEnabled) {
    StackExchange.using("snippets", function() {
    createEditor();
    });
    }
    else {
    createEditor();
    }
    });

    function createEditor() {
    StackExchange.prepareEditor({
    heartbeatType: 'answer',
    autoActivateHeartbeat: false,
    convertImagesToLinks: true,
    noModals: true,
    showLowRepImageUploadWarning: true,
    reputationToPostImages: 10,
    bindNavPrevention: true,
    postfix: "",
    imageUploader: {
    brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
    contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
    allowUrls: true
    },
    onDemand: true,
    discardSelector: ".discard-answer"
    ,immediatelyShowMarkdownHelp:true
    });


    }
    });














    draft saved

    draft discarded


















    StackExchange.ready(
    function () {
    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53464815%2fhow-do-i-remove-a-rule-from-outlook-through-vba%23new-answer', 'question_page');
    }
    );

    Post as a guest















    Required, but never shown

























    1 Answer
    1






    active

    oldest

    votes








    1 Answer
    1






    active

    oldest

    votes









    active

    oldest

    votes






    active

    oldest

    votes









    0














    See the example code below:



    ...
    ...
    'Get Rules from Session.DefaultStore object
    Set colRules = Application.Session.DefaultStore.GetRules()

    'Loop through all rules
    For i = colRules.Count To 1 Step -1
    'Look for oRuleName
    If colRules.Item(i).Name = oRuleName Then
    'If oRuleName found, remove oRuleName rule and save rules
    colRules.Remove (oRuleName)
    colRules.Save '''''Important'''''
    GoTo Continue 'Once oRuleName found, removed and rules saved, jump to Continue
    End If
    Next


    Find the reference link here






    share|improve this answer




























      0














      See the example code below:



      ...
      ...
      'Get Rules from Session.DefaultStore object
      Set colRules = Application.Session.DefaultStore.GetRules()

      'Loop through all rules
      For i = colRules.Count To 1 Step -1
      'Look for oRuleName
      If colRules.Item(i).Name = oRuleName Then
      'If oRuleName found, remove oRuleName rule and save rules
      colRules.Remove (oRuleName)
      colRules.Save '''''Important'''''
      GoTo Continue 'Once oRuleName found, removed and rules saved, jump to Continue
      End If
      Next


      Find the reference link here






      share|improve this answer


























        0












        0








        0







        See the example code below:



        ...
        ...
        'Get Rules from Session.DefaultStore object
        Set colRules = Application.Session.DefaultStore.GetRules()

        'Loop through all rules
        For i = colRules.Count To 1 Step -1
        'Look for oRuleName
        If colRules.Item(i).Name = oRuleName Then
        'If oRuleName found, remove oRuleName rule and save rules
        colRules.Remove (oRuleName)
        colRules.Save '''''Important'''''
        GoTo Continue 'Once oRuleName found, removed and rules saved, jump to Continue
        End If
        Next


        Find the reference link here






        share|improve this answer













        See the example code below:



        ...
        ...
        'Get Rules from Session.DefaultStore object
        Set colRules = Application.Session.DefaultStore.GetRules()

        'Loop through all rules
        For i = colRules.Count To 1 Step -1
        'Look for oRuleName
        If colRules.Item(i).Name = oRuleName Then
        'If oRuleName found, remove oRuleName rule and save rules
        colRules.Remove (oRuleName)
        colRules.Save '''''Important'''''
        GoTo Continue 'Once oRuleName found, removed and rules saved, jump to Continue
        End If
        Next


        Find the reference link here







        share|improve this answer












        share|improve this answer



        share|improve this answer










        answered Nov 25 '18 at 5:37









        Ambrish PathakAmbrish Pathak

        2,5031724




        2,5031724
































            draft saved

            draft discarded




















































            Thanks for contributing an answer to Stack Overflow!


            • Please be sure to answer the question. Provide details and share your research!

            But avoid



            • Asking for help, clarification, or responding to other answers.

            • Making statements based on opinion; back them up with references or personal experience.


            To learn more, see our tips on writing great answers.




            draft saved


            draft discarded














            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53464815%2fhow-do-i-remove-a-rule-from-outlook-through-vba%23new-answer', 'question_page');
            }
            );

            Post as a guest















            Required, but never shown





















































            Required, but never shown














            Required, but never shown












            Required, but never shown







            Required, but never shown

































            Required, but never shown














            Required, but never shown












            Required, but never shown







            Required, but never shown







            這個網誌中的熱門文章

            Academy of Television Arts & Sciences

            L'Équipe

            1995 France bombings