Linking Pivot tables?!?!?

[jen_a_scott]

Hi,

Does anyone know how I can link or appear to link 2 Pivot tables? I have two different lots of data coming through from SQL into 2 pivot tables but I need them to appear as one. The are a few common fields I can use to link but I can't see a way to do it. I have also briefly seen that there is a VBScript that says whatever action is done in the first pivot table will happen in the second... Does anyone know what this is?

Any help would be greatly received as I've hit a wall.

THANKS!!

 

[Andrew Poulsom]

Welcome to MrExcel.

This may help you:

http://www.mrexcel.com/forum/showthread.php?t=31090

 

[jen_a_scott]

Hi,

I've tried the below

Private Sub Worksheet_Calculate()
Dim PF1 As PivotField
Dim PF2 As PivotField
Dim x As String
Application.EnableEvents = False
Application.ScreenUpdating = False
Set PF1 = ActiveSheet.PivotTables("PivotTable1").PageFields(1)
Set PF2 = ActiveSheet.PivotTables("PivotTable2").PageFields(1)
x = PF1.CurrentPage
PF2.CurrentPage = x
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub


but get error 1004. I'm using the row heading as the fields

Is there a way to have this to cover just all row labels?