В Excel не работает автофильтр.

Автофильтр не работает, когда пытаюсь запустить макрос для фильтрации колонки с типом значений - <Дата> (причем макрос записан в атоматическом режиме по <ручным> действиям, при которых все фильтруется Ок). Если тип колонки не <дата>, то автофильтр работает нормально. Я пытался переменную определить как <дата>, результат тот же

Sub Макрос6()

Dim s As Date


s = DateValue("3.10.2002")


Selection.AutoFilter Field:=1, Criteria1:=s

End Sub

Помогите в чем причина?!!!

Обратитесь к разработчику...Обратитесь к разработчику...

Может у вас в ячейках не даты стоят, а строки? Если в установках Windows стандарт отображения даты, например, MM.чч.гг, то если вы введете 14.12.2002, Excel возмет как строку (четырнадцатого месяца быть не може). Опять же гляньте, какой стоит разделитель ".", "/" или что-то другое. Может ошибка здесь. Или в строке ячейки записано "'3.10.2002", т.е. строка, тогда простым указанием что это дата исправить не получится (явно забито "'", что строка). Может быть и что-то другое