Selection.AutoFilter Field:=1, Criteria1:="=" & FistDate
Operator:=xlAnd _
, Criteria2:="<=" & LastDat
-----------------------------------------------
~~ Message posted from
http://www.ExcelTip.com
~~View and post usenet messages directly from
http://www.ExcelForum.com