“无法设置PivotField类的CurrentPage属性”错误

我有一个logging的macros,应该将数据透视表中的业务单元从全部更改为欧洲整合,但每当我运行macros,我得到“无法设置CurrentPage属性”错误。

我的代码:

ActiveSheet.PivotTables("ECBv1.0") _ .PivotFields("[Business_Unit].[Business Unit Hierarchy].[Business]") _ .ClearAllFilters ActiveSheet.PivotTables("ECBv1.0") _ .PivotFields("[Business_Unit].[Business Unit Hierarchy].[Business]") _ .CurrentPage = "[Business_Unit].[Business Unit Hierarchy].[Business].&[European Consolidation]" 

有什么我可以做的,以解决这个错误?