Excel VBA - filter rows within dynamic range










0















On Excel spreadsheet I want to filter out rows which have TRUE in column J.
Running line below works, but only for that specific range - A5:J38:



ActiveSheet.Range("$A$5:$J$38").AutoFilter Field:=10, Criteria1:="FALSE"


Need for the range to adjust automatically to include rows which have a result in formula displayed in column J (it's either TRUE or FALSE). Code below gives "Run-time error '1004': Application-defined or object-defined error"



ActiveSheet.Range(Rows.Count, 10).End(xlUp).AutoFilter Field:=10, Criteria1:="FALSE"









share|improve this question

















  • 2





    ActiveSheet.UsedRange.AutoFilter Field:=10, Criteria1:="FALSE"

    – StoneGiant
    Nov 12 '18 at 18:22











  • I was afraid that might not work, because my first row, where my filters are, is row 5, and I have other things, which I don't want filtered, in first five rows, but I tried and it works. Thanks!

    – Alex
    Nov 12 '18 at 18:30















0















On Excel spreadsheet I want to filter out rows which have TRUE in column J.
Running line below works, but only for that specific range - A5:J38:



ActiveSheet.Range("$A$5:$J$38").AutoFilter Field:=10, Criteria1:="FALSE"


Need for the range to adjust automatically to include rows which have a result in formula displayed in column J (it's either TRUE or FALSE). Code below gives "Run-time error '1004': Application-defined or object-defined error"



ActiveSheet.Range(Rows.Count, 10).End(xlUp).AutoFilter Field:=10, Criteria1:="FALSE"









share|improve this question

















  • 2





    ActiveSheet.UsedRange.AutoFilter Field:=10, Criteria1:="FALSE"

    – StoneGiant
    Nov 12 '18 at 18:22











  • I was afraid that might not work, because my first row, where my filters are, is row 5, and I have other things, which I don't want filtered, in first five rows, but I tried and it works. Thanks!

    – Alex
    Nov 12 '18 at 18:30













0












0








0








On Excel spreadsheet I want to filter out rows which have TRUE in column J.
Running line below works, but only for that specific range - A5:J38:



ActiveSheet.Range("$A$5:$J$38").AutoFilter Field:=10, Criteria1:="FALSE"


Need for the range to adjust automatically to include rows which have a result in formula displayed in column J (it's either TRUE or FALSE). Code below gives "Run-time error '1004': Application-defined or object-defined error"



ActiveSheet.Range(Rows.Count, 10).End(xlUp).AutoFilter Field:=10, Criteria1:="FALSE"









share|improve this question














On Excel spreadsheet I want to filter out rows which have TRUE in column J.
Running line below works, but only for that specific range - A5:J38:



ActiveSheet.Range("$A$5:$J$38").AutoFilter Field:=10, Criteria1:="FALSE"


Need for the range to adjust automatically to include rows which have a result in formula displayed in column J (it's either TRUE or FALSE). Code below gives "Run-time error '1004': Application-defined or object-defined error"



ActiveSheet.Range(Rows.Count, 10).End(xlUp).AutoFilter Field:=10, Criteria1:="FALSE"






excel vba






share|improve this question













share|improve this question











share|improve this question




share|improve this question










asked Nov 12 '18 at 18:16









AlexAlex

238




238







  • 2





    ActiveSheet.UsedRange.AutoFilter Field:=10, Criteria1:="FALSE"

    – StoneGiant
    Nov 12 '18 at 18:22











  • I was afraid that might not work, because my first row, where my filters are, is row 5, and I have other things, which I don't want filtered, in first five rows, but I tried and it works. Thanks!

    – Alex
    Nov 12 '18 at 18:30












  • 2





    ActiveSheet.UsedRange.AutoFilter Field:=10, Criteria1:="FALSE"

    – StoneGiant
    Nov 12 '18 at 18:22











  • I was afraid that might not work, because my first row, where my filters are, is row 5, and I have other things, which I don't want filtered, in first five rows, but I tried and it works. Thanks!

    – Alex
    Nov 12 '18 at 18:30







2




2





ActiveSheet.UsedRange.AutoFilter Field:=10, Criteria1:="FALSE"

– StoneGiant
Nov 12 '18 at 18:22





ActiveSheet.UsedRange.AutoFilter Field:=10, Criteria1:="FALSE"

– StoneGiant
Nov 12 '18 at 18:22













I was afraid that might not work, because my first row, where my filters are, is row 5, and I have other things, which I don't want filtered, in first five rows, but I tried and it works. Thanks!

– Alex
Nov 12 '18 at 18:30





I was afraid that might not work, because my first row, where my filters are, is row 5, and I have other things, which I don't want filtered, in first five rows, but I tried and it works. Thanks!

– Alex
Nov 12 '18 at 18:30












1 Answer
1






active

oldest

votes


















0














I believe you just need to make a small edit:



With ActiveSheet
lastRow = .Cells(.Rows.Count, 10).End(xlUp).Row
.Range("A5:J" & lastRow).AutoFilter Field:=10, Criteria1:="FALSE"
End With





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%2f53267892%2fexcel-vba-filter-rows-within-dynamic-range%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














    I believe you just need to make a small edit:



    With ActiveSheet
    lastRow = .Cells(.Rows.Count, 10).End(xlUp).Row
    .Range("A5:J" & lastRow).AutoFilter Field:=10, Criteria1:="FALSE"
    End With





    share|improve this answer





























      0














      I believe you just need to make a small edit:



      With ActiveSheet
      lastRow = .Cells(.Rows.Count, 10).End(xlUp).Row
      .Range("A5:J" & lastRow).AutoFilter Field:=10, Criteria1:="FALSE"
      End With





      share|improve this answer



























        0












        0








        0







        I believe you just need to make a small edit:



        With ActiveSheet
        lastRow = .Cells(.Rows.Count, 10).End(xlUp).Row
        .Range("A5:J" & lastRow).AutoFilter Field:=10, Criteria1:="FALSE"
        End With





        share|improve this answer















        I believe you just need to make a small edit:



        With ActiveSheet
        lastRow = .Cells(.Rows.Count, 10).End(xlUp).Row
        .Range("A5:J" & lastRow).AutoFilter Field:=10, Criteria1:="FALSE"
        End With






        share|improve this answer














        share|improve this answer



        share|improve this answer








        edited Nov 12 '18 at 18:37

























        answered Nov 12 '18 at 18:20









        KubieKubie

        1,3521518




        1,3521518





























            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%2f53267892%2fexcel-vba-filter-rows-within-dynamic-range%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







            Popular posts from this blog

            𛂒𛀶,𛀽𛀑𛂀𛃧𛂓𛀙𛃆𛃑𛃷𛂟𛁡𛀢𛀟𛁤𛂽𛁕𛁪𛂟𛂯,𛁞𛂧𛀴𛁄𛁠𛁼𛂿𛀤 𛂘,𛁺𛂾𛃭𛃭𛃵𛀺,𛂣𛃍𛂖𛃶 𛀸𛃀𛂖𛁶𛁏𛁚 𛂢𛂞 𛁰𛂆𛀔,𛁸𛀽𛁓𛃋𛂇𛃧𛀧𛃣𛂐𛃇,𛂂𛃻𛃲𛁬𛃞𛀧𛃃𛀅 𛂭𛁠𛁡𛃇𛀷𛃓𛁥,𛁙𛁘𛁞𛃸𛁸𛃣𛁜,𛂛,𛃿,𛁯𛂘𛂌𛃛𛁱𛃌𛂈𛂇 𛁊𛃲,𛀕𛃴𛀜 𛀶𛂆𛀶𛃟𛂉𛀣,𛂐𛁞𛁾 𛁷𛂑𛁳𛂯𛀬𛃅,𛃶𛁼

            Edmonton

            Crossroads (UK TV series)