Copy worksheet and paste it in New workbook, all data except Formulas

S

Sudarshan

Hi,

I want to copy the entire worksheet and paste it into new
worksheet in new workbook. I want to copy everything
except formulas. I am able to do it though Paste special ,
values, format , comments everythings goes very well to
new worksheet except the Images. I have some images in
some cells in my workbook.

How to copy and paste images too..though VBA programming.

Thanks in advance.
 
D

Doug Glancy

Sudarshan,

This copies Sheet1 from Book1 to Book2, adding the new sheet at the
beginning. It copies the whole sheet including images. The second line
converts all formulas in the UsedRange of the copied sheet to values:

Workbooks("Book1").Sheets("Sheet1").Copy
Before:=Workbooks("Book2").Sheets(1)
ActiveSheet.UsedRange = ActiveSheet.UsedRange.Value

hth,

Doug Glancy
 
S

Sudarshan

-----Original Message-----
Sudarshan,

This copies Sheet1 from Book1 to Book2, adding the new sheet at the
beginning. It copies the whole sheet including images. The second line
converts all formulas in the UsedRange of the copied sheet to values:

Workbooks("Book1").Sheets("Sheet1").Copy
Before:=Workbooks("Book2").Sheets(1)
ActiveSheet.UsedRange = ActiveSheet.UsedRange.Value

hth,

Doug Glancy



.
Click to expand...
 
S

Sudarshan

Hi,

Thanks for quick reply..It works fine..But I have one
problem.. The sheets which I am Copying has VBA code
behind it.. I don't want the code to be copied new
worksheet.. Any solutions for it..

Thanks,

Sudarshan
 
Top