OLAP过滤层次结构混乱

作者: trpnest
发布时间: 2024-01-17 06:02:40 (6月前)
转自：

2 条回复

0#
回复此人
AsuRa | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <pre> <code> Function SetFilterOfMonth(yr, mon) mFilter = "&[" & yr & "].&[" & mon & "]" ActiveSheet.PivotTables("PivotTable3").PivotFields( _ "[CS Date].[CS Date Hierarchy].[CS Year]" _ ).VisibleItemsList = Array("") ActiveSheet.PivotTables("PivotTable3").PivotFields( _ "[CS Date].[CS Date Hierarchy].[CS Month]" _ ).VisibleItemsList = Array( _ "[CS Date].[CS Date Hierarchy].[CS Year]." & mFilter _ ) End Function Sub Test() mYear = Worksheets("Sheet1").Range("B8") mMonth = Worksheets("Sheet1").Range("B9") SetFilterOfMonth mYear, mMonth End Sub </code> </pre> </DIV>

编辑

登录后才能参与评论