Thanks, Ron. Worked great!

Ed

"Ron de Bruin" wrote in message
...
Hi Ed

Try this

Sub test()
ActiveSheet.Copy
With ActiveWorkbook.Sheets(1).UsedRange
.Value = .Value
End With
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl



"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