View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Debra Dalgleish Debra Dalgleish is offline
external usenet poster
 
Posts: 2,979
Default Pivot table report filter problem

You can't suppress the "(All)" option in the filter. With programming,
you could select another item if the user selects "All".

For example:

'========================
Private Sub Worksheet_Change(ByVal Target As Range)
Dim pt As PivotTable
Dim pf As PivotField
Set pt = Me.PivotTables(1)
Set pf = pt.PivotFields("Region")

With pf
If .CurrentPage = "(All)" Then
.CurrentPage = .PivotItems(1).Name
End If
End With
End Sub
'============================

This code is stored on the worksheet's code module --
Right-click the sheet tab, and choose View Code
Paste the code where the cursor is flashing.



wrote:
I'm using averages in my pivot table and the automatic (All) option in the
filter doesn't give exactly the right answers so I would prefer to hide this
option. Is there a way of doing this?



--
Debra Dalgleish
Contextures
http://www.contextures.com/tiptech.html