Expected End Of Statement

[excelbytes]

I am trying to filter a table called "Data" based on column 6 being greater than or equal to the value in cell N1. I am getting an Expected End Of Statement error. See the attached screen shot. What am I doing wrong?

 

[BobUmlas]

Change
">="
to
">=" &

 

[Eric W]

Try:

    ActiveSheet.ListObjects("Data").Range.AutoFilter field:=6, _
    Criteria1:=">=" & Range("N1").Value

Also note that you don't need the Operator parameter unless you have more than 1 criteria.

 

[excelbytes]

Change
">="
to
">=" &

Works perfectly, thanks!