Issue with Macro designed to refresh, save and send

[Flagon]

Hi

Hoping someone can help as I am not able to crack this

I have an Excel workbook which has 2 tabs - one tab for the raw data which comes from an ODBC Connection to our Data warehouse
The second worksheet is the Pivot table with results that is what our sales team are interested in

Having not long started I've been asked to open workbook, refresh the data worksheet, refresh the Pivot table and send by email to D/L

My macro is supposed to refresh the worksheet with the ODBC Connection, save it and then send it to a D/L

But when I run the macro it sends first then refreshes the data - so the recipients will not get the latest data unless I do it manually

I have posted an example workbook with the code - any help would be massively appreciated