Hi All,

Is this me just being simple or what?

I cant seem to get this piece of code to work. I have on hidden row bu
it is below the autofilter range. I am alos using a form create
through Data Form

Dim rng As Range
Dim strDate As String

Sheets("Telephone Stats").Select

strDate = Application.InputBox("Please enter date you require dat
for", "Manager Checks")

Selection.AutoFilter Field:=7, _
Criteria1:="=" & CLng(CDate(strDate)

--
Message posted from http://www.ExcelForum.com