Hi Howard,

Am Thu, 23 Apr 2015 04:50:23 -0700 (PDT) schrieb L. Howard:

I don't quite understand this portion, did you determine the range or was that part of the filter function that determined the A1:C54, with B & C empty?

CriteriaRange:=Sheets("Sheet2").Range("A1:C54")

the advanced filter demands a criteria range. And all ranges (List
range, criteria range and the destination range) must have the same
headers.

Therefore I copied the range to sheet2 and changed the headers to the
list header. You can also enter one ore more criterias to the empty
columns.
You can also change the headers in sheets "Part" and use that range as
criteria range.


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional