Hello All,

Very new to VBA. Basically I have a summary page that will feed all data sheets behind it and summarize the results. I have a cell F1 that contains a Date entry on the "Summary" sheet, Then on the "NewDeals" Sheet I have a pivot table "NewDealsPivot" and code entered there as:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)


If Intersect(Target, Range("F1:F2")) Is Nothing Then Exit Sub

'Set the Variables to be used
Dim pt As PivotTable
Dim Field As PivotField
Dim NewCat As String

'Here you amend to suit your data
Set pt = Worksheets("New Deals").PivotTables("NewDealsPivot")
Set Field = pt.PivotFields("Trade Date")
NewCat = Worksheets("New Deals").Range("F1").Value

'This updates and refreshes the PIVOT table
With pt
Field.ClearAllFilters
Field.CurrentPage = NewCat
pt.RefreshTable
End With

End Sub
I need to reference the change on the summary page and not the current sheet "NewDeals"... I know it has to do with the Target piece of code, but having a hard time getting it to work....

Thanks for your help!!