Pivot Table Problem

[natetc]

Hi,

I have a data that is run through a macro to create a pivot table.

In the pivot table I have variables in the daily data that I want to remove, however if the variables are not present in the daily data, then I receive this error:

Run-time error '1004':
Unable to get the PivotItems property of the PivotField class
--
.PivotItems("NOT READY").Visible = False

How do I formula this line to filter the variable if present.

Thanks in advance

 

[VoG]

Maybe like this

On Error Resume Next
.PivotItems("NOT READY").Visible = False
On Error GoTo 0

 

[natetc]

Unfortunately that did not work, here is more of the formula:

.PivotItems("READY").Visible = False
On Error GoTo 0
.PivotItems("COMPLETED").Visible = False
On Error GoTo 0
.PivotItems("NOT READY").Visible = False
On Error GoTo 0
.PivotItems("IN PROGRESS").Visible = False
On Error GoTo 0
.PivotItems("(blank)").Visible = False

As you can see I inputed your sugestion with the 'On Error goto 0'

 

[VoG]

Try like this

On Error Resume Next
.PivotItems("READY").Visible = False
.PivotItems("COMPLETED").Visible = False
.PivotItems("NOT READY").Visible = False
.PivotItems("IN PROGRESS").Visible = False
.PivotItems("(blank)").Visible = False
On Error GoTo 0

 

[natetc]

Peter as always, great work, thanks again!