#Olap cube excel code#

Debug.Print PF.CurrentPageList(PageCount).Function PageCount(PF As PivotField) As Integer.Function PFExists(PT As PivotTable, PFName As String) As Boolean.PF2.AddPageItem PF.CurrentPageList(CPICounter), False.PF2.AddPageItem PF.CurrentPageList(CPICounter), True.Set PT2 = ThisWorkbook.Worksheets('YourSheetName2').PivotTables('PivotTableName2').Set PT = ThisWorkbook.Worksheets('YourSheetName').PivotTables('PivotTableName').Sub SyncOLAPBasedPivotTablesWithMultiDimsAndMultiSelect().Finally we loop round copying the selections across.

Initially we reset the fieldlist in the first pass. Then we need to open the field in the second pivot for multi select and count how many selections have been made in the first. You probably need to add an orientation check here (I did not). If it is we check if it is also in the second pivot table. We then can loop through each Pivot Field checking to see if it is in the page area. One to check if a Pivot Field Exists and the second to count the items in the currentpage list. If the dimensions have been built independantly then there is nothing we can do.ДЇirst we need to build a couple of functions.

I will have to assume the dimensions used in the cubes are the same in that they have the same structure.

#Olap cube excel code#

It might not be easy to implement but I just tested the code below and it works with SQL AS Cube. Multi Dimensional Fields with Multi Selects. Unfortunately you have one of the most difficult scenarios. Re: OLAP Cube Pivot Table - Get Current Page Items Selected