VBA Script not Refreshing Pivot tables

Hello Everyone,  I am facing an issue where the VBA script is not refreshing any pivot tables where I selected " add this data to the data model " when creating because I needed to use the Distinct ...