Hello,

The first line below works cleanly in my project, but I am having
errors/issues with the next two lines.

Globals.Sheet16.PivotTables("PivotTable2").PivotCa che.Refresh()
Globals.Sheet16.PivotTables("PivotTable2").PivotFi elds("fy").Item(1).Visibl*
e = True
Globals.Sheet16.PivotTables("PivotTable2").PivotFi elds("fy").Item(2).Visibl*
e = False

Please advise as to what is needed to revise the code to get it to
work as expected.

Thanks,

Kevin

..PivotFields(1).PivotItems(2).Visibl*e = False

Herbert,

Thanks, it worked as I had hoped!

Thanks,

Kevin

---
frmsrcurl: http://msgroups.net/microsoft.public...on-help-needed

Herbert,

Thanks, it worked as I had hoped!

Thanks,

Kevin

On Feb 28, 12:42*pm, Herbert Seidenberg
wrote:
.PivotFields(1).PivotItems(2).Visibl*e = False