sandiclaus
MIS
The following code works fine when the pivot table data is in a worksheet in an Excel workbook:
ActiveSheet.PivotTables("PivotTable1".PivotFields("PRODUCT LINE".PivotItems.Select
With ActiveSheet.PivotTables("PivotTable1".PivotFields ("PRODUCT LINE"
.PivotFields("BONE MARROW TRANSPLANT".Visible = False
.PivotFileds("BURNS".Visible = True
End With
However in my Pivot Table created in an Access(2000)form, I get the following error message:
Run-time error '1004': Unable to set the Visible property of the PivotItem class.
Anyone know how to make this work?
ActiveSheet.PivotTables("PivotTable1".PivotFields("PRODUCT LINE".PivotItems.Select
With ActiveSheet.PivotTables("PivotTable1".PivotFields ("PRODUCT LINE"
.PivotFields("BONE MARROW TRANSPLANT".Visible = False
.PivotFileds("BURNS".Visible = True
End With
However in my Pivot Table created in an Access(2000)form, I get the following error message:
Run-time error '1004': Unable to set the Visible property of the PivotItem class.
Anyone know how to make this work?