filter with criteria

  • Evening all,
    I have downloaded the workbook with advanced filter with criteria but I'm stuck with one modification.
    I have got it to do look ups on my own database in excel but for some reason I can't seem to get it to show
    all the relevant rows. I have changed the number of rows it copies from 100 to 500 but it refuses to copy more than 20 records.
    Any enlightenment would be much appreciated as apart from this it does everything I need.

  • Re: filter with criteria


    Hi,


    First thing I can see, without looking too closely at your VBA code, is that the range name 'Data_Table_With_Heads' is hard coded with a maximum of 100 rows, although you have 150 rows of data.


    =OFFSET(Data!$A$1,0,0,COUNTA(Data!$A$1:$A$100),COUNTA(Data!$1:$1))


    Code
    'AdvancedFilter data by chosen criteria
                        Range("Data_Table_With_Heads").AdvancedFilter _
                        Action:=xlFilterCopy, CriteriaRange:=Range("FilterCriteria"), CopyToRange:=.Range("Z1")

    [COLOR="Purple"]Regards,[/COLOR]
    [COLOR="Purple"]Batman.[/COLOR]

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!