If condition associated with applying a column filter

I'm trying to use an if-condition regarding filters. I wish I could write a code to check if a specific filter is applied and then do something... (of course)

My first attempt was:

If ActiveSheet.Range("$D$4:$Q$20").AutoFilter Field:=2 then
   Rows("22:22").Select
   Selection.EntireRow.Hidden = True
End If

In the very first line, VBA doesn't accept the condition that is written...

Any guess?

tks