Hi Ajit, SUCCESS!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
The last lot of code (see below) works a treat. Thank you very much. CL Worksheets("Sheet1").Cells(1, 1).Select ActiveCell.EntireRow.Copy Worksheets("Sheet2").Cells(1, 1).PasteSpecial xlPasteAll --~--~---------~--~----~------------~-------~--~----~ 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 -~----------~----~----~----~------~----~------~--~---