Use following code
Sub copy_data()
Windows("Consolidated").Activate
Sheets("sales").Select
Windows("Sales").Activate
Range("a2:b7").Select
Selection.Copy
Windows("Consolidated").Activate
Sheets("sales").Select
Range("a2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("Consolidated").Activate
Range("a2:b11").Select
Selection.Copy
Windows("Consolidated").Activate
Sheets("emp").Select
Range("a2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
On 8/27/08, Ravi Megharaj <[EMAIL PROTECTED]> wrote:
> Hi Group,
> I have attached 3 excel files namely, Sales, Emp_Info and Consolidated. Can
> anyone please provide me code for following task:
> All the data needs to be copied from file Sales-Tab Sales and pasted to file
> Consolidated-Tab Sales. Similarly from file Emp_Info-Tab EMP to file
> Consolidated=Tab EMP.
>
> Please do the needful on file Consolidated which is attached.
>
> Thanks you so much
>
> Regards,
>
> Ravi S Megharaj
>
> >
>
--
Regards
Darshan Amreliya
Sr Engineer
Ispat Industries Limited
Cell No 09321063681
--~--~---------~--~----~------------~-------~--~----~
Visit the blog to download Excel tutorials at
http://www.excel-macros.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/excel-macros?hl=en
Visit & Join Our Orkut Community at
http://www.orkut.com/Community.aspx?cmm=22913620
Visit the blog to download Excel tutorials at
http://www.excel-macros.blogspot.com
To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com
To see the Daily Excel Tips, Go to:
http://exceldailytip.blogspot.com
-~----------~----~----~----~------~----~------~--~---
