Изменение даты в сводной таблице и запуск с периодичностью - VB

Формулировка задачи:

Подскажите, пожалуйста, такую вещь ... Нужно по win шедуле периодически запускать, обновлять и сохранять Excel (2007) файл, в котором содержится сводная таблица. Но обновление должно выполниться с новым значением даты (день, декада, месяц, год), которое в автоматическом режиме каким-то образом должно выбираться из выпадающего меню запросного элемента "Дата" сводной таблицы. Возможно ли такое? Заранее - спасибо!

Решение задачи: «Изменение даты в сводной таблице и запуск с периодичностью»

textual
                            Листинг программы 
                        

                            <font color="00AA00">' Текстовый файл с расширением VBS</font>
<font color="blue">With</font>  CreateObject(<font color="teal">"Excel.Application"</font>)
  .Visible = True
  .Workbooks.<font color="blue">Open</font>(<font color="teal">"C:\Test\RunXL.xls"</font>)
  .Application.Run <font color="teal">"MyMacro"</font>
<font color="blue">End</font> <font color="blue">With</font>

                        