Pivot Table Filter from cell text

[Sandy25]

I am using an Excel 2003 Pivot Table to browse an OLAP cube that I’ve created. I would like to add User Name as a filter (page field). The cube has so many User Name records that when I try to use the filter functionality it takes way too long plus it’s difficult to navigate. I would like to be able to enter the user name into a cell and have it filter.

Is there an easy way to do this or does it require VBA? I’ve tried the VBA and I’m not getting it to work. Here’s the link I’m looking at for the VBA Example. http://blogs.msdn.com/gabhan_berry/archive/2008/01/31/using-cell-text-to-filter-pivottables.aspx

Thanks.

 

[rage300]

You can do this with a fairly simple Macro. Here is an example assuming your filter cell is A1 in a Sheet named Sheet1 and your pivot table is in Sheet2.

variable = Sheets("Sheet1").Range("A1")
Sheets("Sheet2").PivotTables("Pivot Table 1").PivotFields("Insert Your Page Header Here"). _
CurrentPage = variable

Regards,

Jason