У меня есть сводная таблица, которая извлекает данные из куба OLAP, и я хотел бы создать макрос для фильтрации поля сводки, которое содержит «Неделя года» на основе значения в другой ячейке, чтобы я мог легко изменить время рамка стола.

Мой опыт работы с наборами кубов очень ограничен, поэтому я использовал макро-рекордер, чтобы увидеть, что происходит. Пример кода, который я получил, был:

ActiveSheet.PivotTables("PivotTable3").PivotFields( _
        "[Time].[Week of Year].[Week of Year]").VisibleItemsList = Array( _
        "[Time].[Week of Year].&[1]", "[Time].[Week of Year].&[2]", _
        "[Time].[Week of Year].&[3]")

Есть ли способ упростить это, чтобы он устанавливал фильтр с массивом от 1 до n, где n - это значение другой ячейки? Моя цель - показать недели с 1 по 15, введя 15 в указанном поле.