Pivot Table list box
 

i am trying to manually type a parameter (6 digit number) into the list box
on a Pivot table. I sometimes don't get a change on the Pivot table. I've
also tried the following code with a command button linked to a cell

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 7/21/2005 by JJACKLE
'

'

ActiveSheet.PivotTables("PivotTable1").PivotFields ("JOB_NBR").CurrentPage =
Range("b2").Text
End Sub

IS the another way to do this. A list box is totally unsuitable for this
table? But we like the cascading effect for items duplicated from the
previous line(s). This is the only reason to use a pivot table for this
"report". We aren't swaping and ,moving columns. Or is there a way to create
the cascade effect on a regular worksheet?

thanks,
jim
--