VBA to copy data from one workbook to another main workbook

Hi Guys,

I have 2 excel workbooks:
Work_2014.xlsm Work_2014.xlsm
This workbook is the main workbook which contains my lengthy VBA code to extract the data from "Book1.xlsx"
Book1.xlsx Book1.xlsx
This workbook contains certain columns highlighted in yellow which will be selected, copy and pasted into certain cells in "Work_2014.xlsm"

Prior to run, launch both excel workbooks to enable the macro to work successfully as I refer to specific workbooks and sheets in the code.
Please run the macro "RetrieveData" in "Work_2014.xlsm" to see how it runs.
Any form of help is appreciate to shorten my VBA code as it is repeating and long. Or, improve it to do what it was meant to do originally.

Your help is greatly appreciated if you can assist me in this request.

Thanks & Regards,
hate0lif3