Is there a manual way to drill down to data in a pivot table other
than double clicking? I'm trying to write a macro that drills down to
the data under the active cell, but using the double click would
change the location of the active cell. Any ideas???

Thanks in advance.....

Another way to do it manually is to choose
PivotTable Group and Show DetailShow Detail
but that will also leave the detail sheet activated.

Or, via code:

Sub ActiveCellDrillDown()
Dim rng As Range
Set rng = ActiveCell

With rng
.ShowDetail = True
.Parent.Activate
.Activate
End With

End Sub


Jay wrote:
Is there a manual way to drill down to data in a pivot table other
than double clicking? I'm trying to write a macro that drills down to
the data under the active cell, but using the double click would
change the location of the active cell. Any ideas???

Thanks in advance.....


--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html