Change Multiple pivot table's data source at one time

[Charlene123]

I have a doucment with many sheets, one pivot table per sheet. I would like to use a macro to change their data sources all at once to the same data source.

I found this code wich I would like to use as the data source..this ensures there are no extra empty cells (which causes my Value Field Settings to default as "count" instead of "sum"

offset($A$1,,,counta(A:A),counta(1:1))

Thank you in advance! This is my first post.