Ексель+VBA

[Лико]

Помогите плиз очень нужно! Мне нужно в объекте "Таблица" отобрать строки по значению
ActiveSheet.ListObjects("Таблица1").Range.AutoFilter Field:=5, Criteria1:= _
">=" & Range("l2").Value, Operator:=xlAnd, Criteria2:="<=" & Range("l2").Value + 7
в значения фильтра нужные данные отбора загоняет, но все строки прячет и только когда я захожу в фильтр просто ОК подттверждаю он мне тогда показывает почему из макроса это не работает

[VictorM]

Вообще не очень понятная запись
Но вот так автофильтр работает

Код: Выделить всё

Sub Макрос3()
    Sheets("Таблица1").Range("A1").AutoFilter Field:=1, Criteria1:=">=5", Operator:=xlAnd, _
        Criteria2:="<=7"
End Sub

это для примера записи. Данные конечно должны быть Ваши.

[Лико]

Виктор, ну во-первых Таблица1 это не название листа, а объект Таблица
[Private Sub CommandButton2_Click() '
ActiveSheet.ListObjects("Таблица1").Range.AutoFilter Field:=5, Criteria1:= _
">=" & Range("l2").Value, Operator:=xlAnd, Criteria2:="<=" & Range("l2").Value + 7
End sub]

[Лико]

">=" & Range("l2").Value здесь задаеться значение для фильтра , оно береться из определенной ячейки, значение которой меняется

[VictorM]

Лико,

Виктор, ну во-первых Таблица1 это не название листа, а объект Таблица

а файлик приложить можно?
а то как-то влом объект Таблица создавать и воссоздавать Ваши условия
так наверное будет понятнее и проще

[Лико]

а я незнаю как в форум подвешивать файл

[VictorM]

при создании сообщения перейдите в "расширенный режим".
Внизу увидите "управление вложениями".

[Лико]

Ловите , буду очень признательна если подскажите в чем же дело

[VictorM]

ну эт другое дело, посмотрим :-)

[Pavel55]

Проблема заключается в том, что дата в макросе должна быть представлена в виде: Месяц/Число/Год

Посмотрите файл