ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Save sheet as new file w/o refs to original? (https://www.excelbanter.com/excel-programming/324737-re-save-sheet-new-file-w-o-refs-original.html)

Ed

Save sheet as new file w/o refs to original?
 
Thanks, Tom. I had a problem, though: run-time error 1004 - "PasteSpecial
method of Worksheet failed". Help said the xlValues was only available to
the Range object, so I changed ActiveSheet to ActiveSheet.Range("A1") and it
worked okay. Is this just a difference, perhaps, in versions (I'm using
XL2000 with Win2000)? Or did I do something wrong?

Ed

"Tom Ogilvy" wrote in message
...
It isn't that hard:

Activesheet.copy
Activesheet.cells.copy
Activesheet.pasteSpecial xlValues
ActiveWorkbook.SaveAs "MyUnlinkedCopy.xls"

--
Regards,
Tom Ogivly

"Ed" wrote in message
...
Is it possible to save a sheet as a separate new file with a single

command
and carry over everything EXCEPT references to the original file? I

tried
it, but instead of values only I get formulas with references back to

the
original workbook. Or will I need to open a new book and do a series of
Paste Specials (values, column widths, formats, etc.)?

Ed







Tom Ogilvy

Save sheet as new file w/o refs to original?
 
No. Its called a typo:

Activesheet.copy
Activesheet.cells.copy
Activesheet.cells.pasteSpecial xlValues
ActiveWorkbook.SaveAs "MyUnlinkedCopy.xls"

although range("A1") would work as well.

--
Regards,
Tom Ogilvy



"Ed" wrote in message
...
Thanks, Tom. I had a problem, though: run-time error 1004 - "PasteSpecial
method of Worksheet failed". Help said the xlValues was only available to
the Range object, so I changed ActiveSheet to ActiveSheet.Range("A1") and

it
worked okay. Is this just a difference, perhaps, in versions (I'm using
XL2000 with Win2000)? Or did I do something wrong?

Ed

"Tom Ogilvy" wrote in message
...
It isn't that hard:

Activesheet.copy
Activesheet.cells.copy
Activesheet.pasteSpecial xlValues
ActiveWorkbook.SaveAs "MyUnlinkedCopy.xls"

--
Regards,
Tom Ogivly

"Ed" wrote in message
...
Is it possible to save a sheet as a separate new file with a single

command
and carry over everything EXCEPT references to the original file? I

tried
it, but instead of values only I get formulas with references back to

the
original workbook. Or will I need to open a new book and do a series

of
Paste Specials (values, column widths, formats, etc.)?

Ed










All times are GMT +1. The time now is 07:09 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com