VBA to filter by a cell reference

[sanantonio]

Hi,

Have tried searching this and there's a few solutions on here that I'm trying to get to work but I don't seem to be able to.

My code is:

    ActiveSheet.ListObjects("Table26").Range.AutoFilter Field:=13, Criteria1:= _
        "=Range("AC1").Value", Operator:=xlOr, Criteria2:=" = ""

It is the

"=Range("AC1").Value"

that doesn't work. Previously the formula looked like this

    ActiveSheet.ListObjects("Table26").Range.AutoFilter Field:=13, Criteria1:= _
        "=US05", Operator:=xlOr, Criteria2:="="

And this worked fine, I just need the tool to be able to recognize a cell reference instead of US05 so I can have users enter their site designation "US01, US02, etc." and the macro always filter to their specific site.

Could one of you fine folks see where I'm going wrong?

 

[HaHoBe]

Hi sanantonio,

maybe

  ActiveSheet.ListObjects("Table26").Range.AutoFilter Field:=13, _
            Criteria1:=Range("AC1").Value, _
            Operator:=xlOr, _
            Criteria2:=" = """

No Formula for Criteria1 and a missing " at the end of Criteria2.

Ciao,
Holger

 

[sanantonio]

Great thanks I knew it'd be something simple like that!