Temat: kontrola tabeli przestawnej olap z combo boxa

Witam Wszystkich

Mam problem z linkiem combo boxa z tabelą przestawną olap
Przyład:
Dim ph As String
ph = Range("c1").Value
ActiveSheet.PivotTables("Tabela przestawna1").PivotFields( _
"[Nazwa handlowca].[Nazwa handlowca]").CurrentPageName = _
"[Nazwa handlowca].[All Logo H].[Avita]"
Makro działa z developera ale na podstawie sztywnego wpisu z listy np " Avita"
Muszę "Avitę" zastąpić zmienną ph która pochodzi z komórki c1 linknowanej z combo boxem

Ważne jest że tabele przestawne z olapa różnią się od tabel z excela lub np z sql server
Na tych tabelach makro działa bez problemu
przykład
Worksheets("t1").PivotTables("Tabela przestawna1").PivotFields("Miesiac").CurrentPage _
= Range("c1").Value
Worksheets("t2").PivotTables("Tabela przestawna1").PivotFields("Miesiac").CurrentPage _
= Range("c1").Value


Jak to zrobić ?

Wielkie dzięki za pomoc

Pozdrawiam

Grzesiek

Temat: kontrola tabeli przestawnej olap z combo boxa

A tak ci nie zadziała?

Dim ph As String

ph = Range("c1").Value

ActiveSheet.PivotTables("Tabela przestawna1").PivotFields( _

"[Nazwa handlowca].[Nazwa handlowca]").CurrentPageName = _

"[Nazwa handlowca].[All Logo H].[" & ph & "]"

podkładamy zmienną jako parametr wywołania Avita
Strzelam bo nie mam olapa więc weź to jako propozycję do testów.