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"
With ActiveSheet.PivotTables("PivotTable1"
.PivotFields("BONE MARROW TRANSPLANT"
.PivotFileds("BURNS"
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?