Filter Value = Cell Value VBA 2007

[vvSTRIDEvv]

Hello.

I'd like to automate a basic auto filter, based on a value in another sheet.

Sheet 1
Cell G8 (Date)

Sheet 2
Auto Filter Field:1 set to filter by date value in Sheet 1 G8 on change.

Any help would be greatly appreciated.

 

[Sektor]

What range must be filtered?

 

[vvSTRIDEvv]

The range is:

Range("$A$1:$M$133")

 

[vvSTRIDEvv]

Got it, thanks:

ActiveSheet.Range("$A$1:$M$2000").AutoFilter Field:=1, Operator:= _
xlFilterValues, Criteria1:=Sheets("Paysheet").Range("G8").Value
Sheets("Paysheet").Select