I am trying to filter for dates before today. However, my code below is just simply not working. It runs but it does not seem to be filtering. Anybody know whats wrong with the code below? Thanks!

Sheets(1).Range("A1:AC1").AutoFilter Field:=11, Criteria1:="<" & CLng(Date)