Hi,
hab noch keine Lösung für mein Problem:
Es gibt eine Pivot, die einen OLAP CUBE abfragt. Die Pivot müsste ich per VBA-Makro so ändern, dass im Pivotitem-Bereich (Zeilenwerte) ein Wert selektiert wird. Dann können auch nicht-User das Sheet bedienen.
Wenn ich via Rekorder die Auswahl treffe:
Code: |
ActiveSheet.PivotTables("PivotTable1").PivotFields("[DIM_Kunde_BES].[Kdnr]"). _
HiddenItemsList = Array("[DIM_Kunde_BES].[Kunde_BES gesamt].[001199]", |
und er fängt an einArray zu bilden und setzt einen neuen Wert unter den nächsten. Also für jede Kdnr (Kundennummer).
... da sind > 6000 Werte drin und mehr...
gibt es einen Möglichkeit zu sagen in Cells(x,y) steht der Wert, bitte nimm den statt z.B. der 001199 (siehe Code) ?
Ich will also eine explizite Zuweisung der Kundennummer. Welche Eigenschaft/ Funktion muss ich nutzen, um dem Pivottable zu sagen, dass Pivottable.Pivotfields.Pivotitem = sheet.cells(x,y) ist ?
kann da jemand helfen?
thx Maczac
|