Hi Satish,

It's difficult to say without an example of what you're trying to copy/
paste, but I will try to help as best I can.

1) You might like to place a break point immediately after this line:

Range("A1:Z" & Cells(Rows.Count, "A").End(xlUp).Row).Copy

Immediately after this line of code has been executed, the data you
seek should be in the clipboard - try pasting it into a test
spreadsheet to confirm that it you are getting the data you think you
are.

2) Assuming that test #1 shows that you are getting the data you think
you should, continue stepping through the code.  I have a suspicion
about the following line of code:

ActiveSheet.Paste Range("AA" & vStart & ":" & "AA" & Cells(Rows.Count,
"A").End(xlUp).Row).Value = vFile

I think it might work better as the following:

ActiveSheet.Paste Range("AA" & vStart & ":" & "AA" & Cells(Rows.Count,
"A").End(xlUp).Row)

Let us know if you have a breakthrough or can provide an example sheet
for us to test with.

Regards,

Chris Spicer
http://technicana.com/EasyDeeby.html

--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---

Reply via email to