Ich habe eine Pivot-Tabelle, die Daten aus einem OLAP-Cube abruft, und ich möchte ein Makro erstellen, um ein Pivot-Feld, das 'Week of Year' enthält, basierend auf dem Wert in einer anderen Zelle zu filtern, damit ich das leicht ändern kann Zeitrahmen der Tabelle.

Meine Erfahrung mit Würfelsätzen ist sehr begrenzt, deshalb habe ich den Makrorecorder verwendet, um zu sehen, was passiert ist. Der Beispielcode, den ich bekam, war:

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]")

Gibt es eine Möglichkeit, dies zu vereinfachen, sodass der Filter mit dem Array 1 auf n gesetzt wird, wobei n der Wert einer anderen Zelle ist? Mein Ziel ist es, die Wochen 1 bis 15 anzeigen zu können, indem ich 15 in ein bestimmtes Feld eingebe.