Autofilter with headers in Row 2

[Gtabtr1]

I'm sure this is a simple answer but I'm fairly frustrated trying to get it to work and not being able to identify why it is not working. My data headers are in row 2. Most of Row 1 is empty, out of 16 used columns, only 2 have data. But I need my autofilter to use row 2 are the header row. I'm getting the dreaded "Autofilter method of range class failed". Please! Please! What am I missing?

Dim AreaList As Range
Dim area As Range
Set AreaList = Workbooks(Pretty).Sheets(List).Range("A2:A" & last)

Workbooks(Master).Sheets(Participants).Activate
Workbooks(Master).Sheets(Participants).Select
Dim RangetoFilter As Variant
Dim Headerrow As Variant
RangetoFilter = "A3:P" & Lastrow
Headerrow = "A2:P2"
For Each area In AreaList

ActiveSheet.AutoFilterMode = False
ActiveSheet.Range(Headerrow).Select
ActiveSheet.Range(Headerrow).AutoFilter
ActiveSheet.Range(RangetoFilter).AutoFilter Field:=5, Criteria1:=area, Operator:=xlFilterValues

 

[Fluff]

Do you have any blank rows within your data?

 

[Gtabtr1]

No every row has data

 

[Fluff]

Ok, one other thing, are your trying to filter for each individual value in the area list, or all of them?

 

[Gtabtr1]

I'm trying to filter on one number at a time from a list where the number could be included once or 20 times for example. So one value at a time.

 

[Fluff]

Ok, how about

   Dim AreaList As Range, Cl As Range

   Set AreaList = Workbooks(Pretty).Sheets(List).Range("A2:A" & last)

   With Workbooks(Master).Sheets(Participants)
      For Each Cl In AreaList
         .Range("A2:P2").AutoFilter 5, Cl.Value
         ' do something
      Next Cl
   End With

 

[Gtabtr1]

I changed "C1" to "Area" to help me understand what it is but other than that I still get the "Autofilter method of range class failed" error on the ".Range("A2:P2").AutoFilter 5, Area.Value" line.

Cell A1 is empty. Headers start in A2. Does that matter?

 

[Fluff]

Is your data on a protected sheet and/or is it a structured table?

 

[Gtabtr1]

No. It's just an Excel spreadsheet with data in A1:C42 but the area I need (numeric values) are in column A. A2 is the first value. A42 is the last numeric value.

 

[Fluff]

I was referring to the sheet that you are trying to filter, rather than the arealist.