Dear All,

I have a column of dates, past & future. It may or may not have
current date. I am trying to auto filter to view only those rows that
contains dates of future (as of current date) . Manually this is fine
but when I try to recorded macro this as macro and edit it to modify
condition as

Selection.AutoFilter Field:=27, Criteria1:="=" & today(),
Operator:=xlAnd

It gives an error, "Compile Error: Sub or function not defined"

Following is my entire code

Sub accrual_swap()
'
' accrual_swap Macro
' Macro recorded 6/6/2007 by Ashish Sharma
'

'

Range("AA1").Select
Rows("1:1").Select
Range("AA1").Activate
Selection.Insert Shift:=xlDown
Selection.AutoFilter
Range("AA1").Select
Selection.AutoFilter Field:=27, Criteria1:="=" & today(),
Operator:=xlAnd
' Following was original line of code
' Selection.AutoFilter Field:=27, Criteria1:="6/4/2007",
Operator:=xlAnd
Columns("A:Y").Select
Range("Y1").Activate
Selection.Delete Shift:=xlToLeft
Columns("C:L").Select
Selection.Delete Shift:=xlToLeft
Range("A21:A79").Select
End Sub

Please help