Error in Copy Paste Code

[AVG123]

Hello excel friends....

I found this code from Internet for Copy and paste workbook data but i am unable to modify it in my own condition

1. code is working flawless but below code is good for only one sheet but when i want to copy the data from more than one workbook it failed becoz every workbooks have Col A:A is blank and ROW A1 to XFD1 is blank
please anyone modify this code

Please see the attached file for better understand the condition

Please Login or Register  to view this content.

[Logit]

.
Using the macro here on my own workbooks (I did not download the files you posted) ... the macro seems to work fine.
I changed one line of code so the macro downloads from the ACTIVESHEET instead of a specifically named sheet.

See if that works for you.

Please Login or Register  to view this content.

[AVG123]

please try to download these file and then run the code for better understand

[MarvinP]

Try changing this line from:
wkbDest.Sheets("Sheet1").Cells(wkbDest.Sheets("Sheet1").Rows.Count, "A").End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues
to
wkbDest.Sheets("Sheet1").Cells(wkbDest.Sheets("Sheet1").Rows.Count, "B").End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues

[Logit]

.
Ok

I downloaded both workbooks.

I put your macro into a Third new workbook and ran it by opening both workbooks (one at a time) and downloading the existing data onto Sheet1 of my new workbook.

Worked flawlessly.

Is there something else you wanted the macro to do ?

[AVG123]

It is not working when i select more than 1 workbook....please fix it

[Logit]

.
Are you attempting to select more than one workbook at a time ... instead of selecting one workbook, downloading the data ... then open a different workbook and repeating the process ?

If that is what you are attempting to do, the macro is not designed for that.

[AVG123]

Sir both sheets have 291 rows data but when i open both then it is showing only 274 rows data without heading

[AVG123]

yes sir i am selecting more than one workbook at a time

[Logit]

.
When I run the macro here .... the large file downloads 289 rows of data without the headers. The smaller file downloads 15 rows of data without the headers for a total of 304 rows of data.

I don't know the reason why it downloads less rows of data at your location.

???

[AVG123]

Sir how is it possible
1. First file have B2 to B277 data (including Header)
2. Second file have B4 to B19 rows data (total 15 rows data should be paste after complete step1 without header)

then total should be 292 rows data

[Logit]

.
See attached ...

[AVG123]

Sir it is working but i want to work on more than one file in one time......not one after one

[Logit]

.
Let me look at it. I will need some time to construct the new macro.

The new macro will require that ALL workbooks be in the same folder.

[AVG123]

Right sir please take time to fix it......i will waiting for that

[Logit]

.

Please Login or Register  to view this content.

[AVG123]

Thanks sir it is working fine but few amendment i want........
1. Cant choose the specific file (ask me to choose the file)
2. Copy and paste is working fine but after first file code insert 09 blank rows and next file's Heading also....... i just want paste the data continuously without heading.....becoz heading already exist on top of the file

Thats it

[Logit]

.

Please Login or Register  to view this content.