Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
макрос меняющий диапазон дат в сводной таблице, макрос
 
Ежедневно нужно обновлять сводные таблицы за предыдущие 2 недели, данные все макросом подгружаются, а как правильно обновить свод- не знаю. Помогите пожалуйста)))

Код
With ActiveSheet.PivotTables("название свода").PivotFields("Дата") 
    .ClearLabelFilters 
    .PivotFilters.Add Type:=xlDateBetween, Value1:=Format(Range("D4"), "dd\/mm\/yyyy"), Value2:=Format(Range("D5"), "dd\/mm\/yyyy") 
    End With

вот эта штука не помогает(
Страницы: 1
Наверх