Try:

For Each c In Cells.SpecialCells(xlCellTypeFormulas)
c.Value = c.Value
Next

--
Damon Longworth

Don't miss out on the 2005 Excel User Conference
Sept 16th and 17th
Stockyards Hotel - Ft. Worth, Texas
www.ExcelUserConference.com


"Jack Brackson" wrote in message
...
Is there a way to convert all the formulas in a spreadsheet to values.

I tried copy-paste special-values but there are merged cells and that does
not work.

TIA.