Изменение фильтра сводной таблицы Excel из под Delphi

[bobik47]

Снова здравствуйте, снова нуждаюсь в Вашей помощи!
Нужно из под Delphi изменять значение фильтра сводной таблицы. Сами значения фильтра берутся с отдельной страницы и подставляются, но данные в сводной таблице не меняются. При пошаговом выполнение видно, что меняется только первая строчка фильтра, т.е. например значения фильтра:
"12.08.2013
13.08.2013
14.08.2013
15.08.2013"
После двух циклов:
"14.08.2013
13.08.2013
14.08.2013
15.08.2013"
А значения в сводной таблице остаются прежними.

Меняю следующим образом:

OpenedExcel.Sheets['cast_pivots'].PivotTables['СводнаяТаблица1'].PivotFields('Day').CurrentPage:=DateToStr(currday);

Возможно кто-нибудь сталкивался и знает, как решить эту ситуацию?

Заранее благодарю за Вашу помощь!