Multiple Pivots With The Same Row - How Do I Make Them Change At The Same Time

I'm using Excel 2003 for this project.

For example: -
I have 3 pivot tables with the same row 'Media' (TV, Neswpaper, Magazine) and each has count as the data field (number of people who read/watch) then each pivot has a different column, Region, age, ***.

If I change the row of the first pivot to only show TV, how do i code it so pivot 2 and 3 only show TV also? I may have upto 20 pivots inthe end.

I found the below code to do this for page fields but can't adapt to rows -

HTML
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim ptTable As PivotTable, ptItem As PivotItem, vFields As Variant, lngField As Long
On Error GoTo ExitPoint
vFields = Array("filed1", "field2", "field3")

Application.EnableEvents = False
For lngField = LBound(vFields) To UBound(vFields) Step 1
For Each ptTable In ActiveSheet.PivotTables
If ptTable <> Target Then
With ptTable.PivotFields(vFields(lngField))
.CurrentPage = Target.PivotFields(vFields(lngField)).CurrentPage.Value
End With
End If
Next ptTable
Next lngField
ExitPoint:
Application.EnableEvents = True
End Sub