AutoFilter Multiple Criteria Array

**erock24** · 03-28-2011, 10:09 PM

The attached sheet contains the following code I wrote. I'm trying to set the autofilter to display only the values I load into my array (even numbers 2 - 12 on column D). The code does not debug, but it doesn't work? The autofilter gets turned on but the criteria doesn't. If i remove the "Operator:=xlFilterValues" then the last value allocated to my array, which is "12" does get set. Not sure what is wrong.

Please Login or Register  to view this content.

**Deamo** · 03-28-2011, 11:07 PM

I'm not certain why..
It seems to be that your array needs to be a String datatype rather than variant.

Perhaps someone with more knowlege on these functions could explain..

**erock24** · 03-29-2011, 01:26 PM

I got it!! I changed the array variable to a string and in the autofilter code I edited to this:

Please Login or Register  to view this content.

I also fill the array in a separate function routine now. Here is whole code. which works.

Please Login or Register  to view this content.

**qudsia.hussain** · 01-02-2013, 04:33 AM

Hi erock24,

I'm trying something similar with a macro but I'm not able to figure out why the criteria is not returning the right results. Here is my code:

Range(ActiveCell.CurrentRegion.Address).AutoFilter Field:=ActiveCell.Column, Criteria1:=Array( _
"HANNA*", "MARK*", "LUTHER*")

So, basically I need my filter to do a "begins with" filter on the mentioned names. But the macro seems to return filter results only based on the last name mentioned in the Array and ignores the rest. Any idea how I can fix this, or if I need to change my code completely? Please help!

Thanks,
Q.