Check out this link... there are some workbooks you cna download that
demonstrate exactly what you are trying to do...

http://www.contextures.com/excelfiles.html#Pivot
--
HTH...

Jim Thomlinson


"pkern" wrote:

I'm working with Excel 2007 and trying to have the report filter in one pivot
table automatically chage the 2nd pivot table on the same sheet. I'm new and
having some problems. any help would be appreciated. Here is my code.

My main pivot table is called PVT1
Fiscal_Cal is the field my report filter is in
Fiscal_Calendar_Check is the field beside for checking
PVT2 is the second table
PVT2Date is the date the report filter is in

Here is my code

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("Fiscal_Cal") < Range("Fiscal_Calendar_Check") Then
Application.ScreenUpdating = False
Else

Exit Sub

End If


If Range("Fiscal_Cal") < Range("Fiscal_Calendar_Check") Then
Range("Fiscal_Calendar_Check") = Range("Fiscal_Cal")
ActiveSheet.PivotTables("PVT2").PivotFields("PVT2D ate").CurrentPage
= Range("Fiscal_Cal").Value
End If

Application.ScreenUpdating = True

End Sub

What am i missing?