copy sheet without links

[Guest]

I'm using code to copy a worksheet to another workbook - How do i break any
links on that sheet to the original workbook and just leave it as it looks.

Sheets("QUOTE").copy After:=Workbooks("RigCostTrack.xls").Sheets("Tracker")

thanks

 

[Guest]

check out the delete links wizard:

http://support.microsoft.com/default.aspx?scid=KB;en-us;q188449

 

[Rob Turnbull]

Ciara,

You are very close to the solution, if you add this next line of code
after teh one you have below, then i think we have ourselves a
solution

ActiveWorkbook.BreakLink Name:="*linkedbook*", Type:=xlExcelLinks

Were *linkedbook* is the name of the workbook that the sheet was
linking to

Hope this helps, if not please let me know

Kind regards,

Rob Turnbull
*Sortoutmyexcel.com*

 

[Guest]

ok - iv downloaded it - but still don't know what to do?

can i write it into the code to delete all links?

 

[Guest]

im getting run time error 438

object doesn''t support this property or method

any ideas?

 

[Dave Peterson]

Maybe just copy|paste special|Values????

But that'll get rid of all the formulas.

 

[Guest]

yeah - I find if i copy|pastespecial|values and then |pastespecial|formats it
looks as I would like it.

Thanks for your ideas all,

Ciara