Макрос, изменяющий значения OLAP - PullRequest
0 голосов
/ 06 августа 2020

Вначале я должен сказать, что начинаю свое приключение с VBA :) Я использую базу данных OLAP и хочу сделать ее более автоматизированной c. Я хочу изменить значение отчета на основе значения ячейки. Я создал такой макрос:

Dim n As String

n = Range("F1").Value

    ActiveSheet.PivotTables("Tabela przestawna1").PivotFields( _
        "[Store].[Store Number].[Store Number]").ClearAllFilters
    ActiveSheet.PivotTables("Tabela przestawna1").PivotFields( _
        "[Store].[Store Number].[Store Number]").CurrentPageName = _
        "[Store].[Store Number].&[1912040]

When the number [1912040] is typed, it works. when i am changing number for the "n" it doesn't work.
I am receiving info that the element can't be found in OLAP module - run-time error '1004'

Thank you in advance for your help.
...