VBA filtering array

[jon1315]

Hi All
I'm looking to filter with the criteria being an array - can't quite get it to work.

Simple example below - where am I going wrong?

Thanks in advance!
Jon

Sub test()
Dim Narrative As Variant
Narrative = Array("*OPENING*", "*CLOSING*", "*VALUE*")
Range("A2:H100").AutoFilter FIELD:=4, Criteria1:=Narrative
End Sub

 

[Fluff]

You can only use two criteria, unless doing an exact match.

 

[jon1315]

I have come across the 2 criteria limitation before but was trying to come up with a way around it!

Is there a way to do a VBA equivalent of an advanced filter? Would that method work? In reality there's probably 7/8 wildcards I need to delete from a list, and it wouldn't be the end of the world to do it long handed but, an opportunity to learn & that..!

 

[Fluff]

Yes, it can be done using advanced filters, just turn on the macro recorder & record yourself setting up & using an advanced filter, that way you will have the code.