hi Tyrone,

For Each pvtItem In pfR.PivotItems
If pvtItem = "(blank)" Or pvtItem = "" Then
pvtItem.Visible = False
Else
pvtItem.Visible = True
End If
Next pvtItem


--
isabelle



Le 2012-10-04 02:04, Tyrone Skogstrom a écrit :
PivotItem.Value = "(blank)"

How can I hide the blank in a pivot, if the VBA code has to be language independent?

Example of the code I have:

On Error Resume Next
For Each pvtItem In pfR.PivotItems
pvtItem.Visible = False
If pvtItem.Value = "(blank)" Then pvtItem.Visible = False
If pvtItem.Value = "" Then pvtItem.Visible = False
Next pvtItem


Kindest,
Tyrone