Need to copy data excel

[pawasthi]

Hi All,

I have more than 2 workbooks (All with different names) and these workbooks have more than 3 sheets (All with different names) in it.

1. I have pick the data from each workbook's sheet which is on place two (from sequence i.e if sheet names are A, B, C. Then I have to pick data from "B". But each workbook may have different name on Place two worksheet)

2. copy the data from row 11 to the end of the data row.

3. paste it on a different workbook sheet (Say Result sheet).

4. Then pick next workbook and repeat the steps 1-2 and paste the data on results sheet after the last row of data which was copied before this step.

Please find the attached sheets for example

Thanks for all support

[neeeel]

dim wb as workbook, copyRange as range
set copyRange = thisworkbook.sheets(1).range("A1")
set wb = workbooks.open("name of file here")
wb.sheets(2).range("K1").entirerow.copy
copyRange.pasteSpecial
set copyRange = copyRange.offset(1,0)
.
.
.
.
wb.close

You would need some sort of loop, and change the name of the workbook you want to copy from each time ,or ask for user input for the file each time

[pawasthi]

Thanks for prompt reply...