Страницы: 1
RSS
Фильтрация дат с помощью макроса
 
Уважаемые знатоки VBA, добрый день.

Прошу подсказать, в чем проблема в моем макросе, который должен фильтровать даты в таблице (столбец С) на основе даты из ячейки H1.
Чувствую ,что проблема достаточно простая, но никак не могу понять в чем дело, т.к. использовал CDbl

Макрос фильтрует таблицу, но в фильтре вместо даты, отображается числовое значение, в результате таблица после фильтрации ничего не содержит
Код
Sub dd()

Dim R#
Application.ScreenUpdating = False
R = Cells(Rows.Count, 1).End(xlUp).Row

ActiveSheet.Range("$A$2:$C$" & R).AutoFilter Field:=3, Criteria1:="=" & CDbl([H1])
End Sub
 
Код
....., Criteria1:=Format([H1], "DD.MM.YYYY").....
Изменено: Sanja - 17.03.2016 10:05:11
Согласие есть продукт при полном непротивлении сторон
 
Sanja,спасибо большое - РАБОТАЕТ!!!
Страницы: 1
Наверх