Hello
I use the following code to filter a pivot table and disable the "(Blank)" cells from being viewed, and this works fine in an English installed Excel .
We also have Excel installed in Dutch and French.
In these languages the "(Blank)" is states as "(leeg)" for Dutch and "(vide)" for French
If we run the same code in another language the code get's an error and stops.
Is there a way around this ?
With ActiveSheet.PivotTables("PivotErrResp").PivotFields("Category")
If bFieldItemExists("Act of God") Then
.PivotItems("Act of God").Visible = False
End If
If bFieldItemExists("fault 1") Then
.PivotItems("fault 1").Visible = True
End If
If bFieldItemExists("fault 2") Then
.PivotItems("fault 2").Visible = True
End If
If .PivotItem = "(blank)" Or PivotItem = "" Then
.PivotItems("(blank)").Visible = False
End If
End With
Thanks for helpng me on this one.
Kind regards
Bookmarks