Need help for VBA code - pivot table updates

Hi,

My file has one data sheet (tab name "Data") which contains daily data and other 2 sheets which contain several pivot tables. The number of records are not constant on a daily basis (columns are the same, but the rows are changing, sometimes has more rows, sometimes has less rows). Currently, I have to manually update all pivot tables by clicking "Analyze" on tool bar, select "Change Data Source", and select the entire records, and finally refresh pivot tables.

What I am looking for is using VBA code to automatically select all the records in "Data" tab, and update all pivot tables based on the selected data. I've tried to search some codes online, but none of them is successful. Is there anyone here can help me this? Thanks in advance.

Chris

Set the range for your pivot table to the entire column(s), e.g. header is in A1:E1, data is A2:E[ ] set pivot table source to A:E