Всем доброго времени суток! Сделала простенький макрос для выборки данных по дате. Но в результате получаю все заполненные строки скрытыми. Захожу в ручной фильтр, там срабатывает все верно. Стоит нужная дата. Просто нажимаю ОК и происходит сортировка. Т.е. я так понимаю, что макрос срабатывает, но почему-то не до конца. И не пойму в чем причина. Буду благодарна, если кто-то подскажет
Метод AutoFilter не учитывает региональных настроек и интерпретирует выражение ">09.09.2020" как текст, а не как выражение, относящееся к датам (или числам).
Sub Запись_фильтр()
Dim DateOne As Date
iDateOne = "09.09.2020"
With ActiveSheet
If .FilterMode = True Then .ShowAllData
.ListObjects("Таблица1").Range.AutoFilter Field:=1, Criteria1:=">" & Format(iDateOne, "#")
End With
End Sub