Hi Ashish,

Try:

'=============
Public Sub Tester001()
Dim srcWB As Workbook
Dim destWB As Workbook
Dim SH As Worksheet

Set srcWB = Workbooks("First Book.xls") '<<=== CHANGE
Set destWB = Workbooks("Second Book.xls") '<<=== CHANGE

Set SH = srcWB.Sheets("Sheet2")

SH.Copy After:=destWB.Sheets(1)


End Sub
'<<=============

Amend the workbook and sheet names to accord with your scenario.


---
Regards,
Norman


"ashishprem" wrote
in message ...

Hi, I want to copy one excell sheet fom 1 file to another. The source
excel sheet contains some images also. Because of which row by row copy
is not giving the result in the same format as present in the source
file.
Is there any code to just replicate the sheet in the same format.
Regards,
Ashish


--
ashishprem
------------------------------------------------------------------------
ashishprem's Profile:
http://www.excelforum.com/member.php...o&userid=31485
View this thread: http://www.excelforum.com/showthread...hreadid=517129