VBA code to consolidate coloumns in muliple sheets into multiple coloumns in one sheet?

I have multuple sheets in one workbook. I want to consolidate F1:F47 in each of the 4 sheets and list them in coloumns in the Summary sheet. I used the code below and I am able to get the results but they are sacked into one coloumn.

Please Login or Register  to view this content.

Please help

Thanks,
Brett

Like so:

Please Login or Register  to view this content.

Please remember to use CODE tags every time you post code in your messages.