Code to Refresh Pivot Table

I have a workbook with multiple worksheets. Each worksheet has its own
pivot table.

I put this code on the first worksheet with a pivot table and it works
great:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.PivotTables(1).PivotCache.Refresh
End Sub
But, when I copy this code to the second worksheet, I get this error:
"Pivot table is not valid."

What's up?
S. Jackson

Okay, I somehow fixed my problem by simply deleting the pivot table on the
second worksheet and then re-inserting it. Everything works fine now. Go
figure?

S. Jackson

"S Jackson" <jackson_shelly@hotmail.com> wrote in message
news:O#KOKokrFHA.1172@TK2MSFTNGP11.phx.gbl...
> I have a workbook with multiple worksheets. Each worksheet has its own
> pivot table.
>
> I put this code on the first worksheet with a pivot table and it works
> great:
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> ActiveSheet.PivotTables(1).PivotCache.Refresh
> End Sub
> But, when I copy this code to the second worksheet, I get this error:
> "Pivot table is not valid."
>
> What's up?
> S. Jackson
>
>