Hi Bill,

No workbook attached.

Regards

Phil

Hi Philip,

Thank you for fast reply.

Please check attached file.

Thanks;

Bill

Hi Philip,

I'm sure you are busy, when you have a chance please check my request.

Thanks;

Bill

Hi Bill

See attachment, i am presuming there are headers on all sheets ?

Rob

Hi Robert,

This is impressive! Thank you very much!

Please can you let me know that, the changes in code, in case the sheets not have headers.

Thanks;

Bill

Hi Bill

Sorry for the delay have been on holiday in Greece

If the sheets do not contain headers then change the Offset from (1) to (0) as below

Sheets(i).Cells(1, 1).CurrentRegion.Offset(0).Copy Tgt.Cells(Lr, "A")

Regards

Rob

Hi Robert,

I hope you had a nice holiday.

Grateful for your support..

Thanks;

Bill

Hi Robert,

I likes the coding that you shared with Philip and Bill. It is really simple. Thank you for your sharing.

I am having a problem in combining 2 sub into 1. Could you please guide me what is the issue in the coding. The code are not able to execute. I would like to to have a coding to combine the 3 different workbook into one workbook and sorting the worksheet in the same workbook.

I have the code to combine 3 different workbook into one. And the code to sort the worksheet in same workbook. However, i have no idea how to add into one sub. Could you please help me? Thank you

Regards,

CY

Hi Robert or Bill,

Do you have chance to take a look at my questions? Or anyone can help me? Please? Thank you.

Regards,

CY